home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-11-21 | 84.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 31 45 31 |@0000900|0,0001E1|
|00000040| 43 30 00 41 c0 e1 01 00 | 10 d2 01 00 c0 51 01 00 |C0.A....|.....Q..|
|00000050| 0d 00 0a 1e 20 f4 20 3e | 24 2e 21 42 69 72 74 68 |.... . >|$.!Birth|
|00000060| 64 61 79 2e 21 52 55 4e | 49 4d 41 47 45 42 0d 00 |day.!RUN|IMAGEB..|
|00000070| 14 29 20 c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |.) .."Ho|urglass_|
|00000080| 4f 6e 22 3a f4 54 52 41 | 43 45 20 54 4f 20 22 24 |On":.TRA|CE TO "$|
|00000090| 2e 44 45 42 55 47 22 0d | 00 28 34 20 f2 73 65 74 |.DEBUG".|.(4 .set|
|000000a0| 75 70 3a f2 73 65 74 75 | 70 32 3a f2 73 65 74 75 |up:.setu|p2:.setu|
|000000b0| 70 33 3a f2 73 65 74 75 | 70 5f 66 69 6c 6d 73 3a |p3:.setu|p_films:|
|000000c0| f2 73 65 74 75 70 5f 68 | 65 6c 70 0d 00 32 39 20 |.setup_h|elp..29 |
|000000d0| f2 73 65 74 75 70 5f 73 | 63 6f 70 65 73 3a f2 73 |.setup_s|copes:.s|
|000000e0| 65 74 75 70 5f 73 70 6f | 72 74 73 3a f2 73 65 74 |etup_spo|rts:.set|
|000000f0| 75 70 5f 73 6f 6e 67 73 | 3a f2 63 68 65 63 6b 5f |up_songs|:.check_|
|00000100| 70 61 74 68 0d 00 37 47 | 20 e7 20 72 69 73 63 24 |path..7G| . risc$|
|00000110| 3e 3d 22 33 22 20 ff 28 | 22 52 4d 45 4e 53 55 52 |>="3" .(|"RMENSUR|
|00000120| 45 20 44 72 61 77 46 69 | 6c 65 20 30 2e 30 20 52 |E DrawFi|le 0.0 R|
|00000130| 4d 4c 4f 41 44 20 3c 4f | 62 65 79 24 44 69 72 3e |MLOAD <O|bey$Dir>|
|00000140| 2e 44 72 61 77 46 69 6c | 65 22 29 0d 00 3c 0e 20 |.DrawFil|e")..<. |
|00000150| f2 63 61 6c 63 5f 64 61 | 79 0d 00 46 3f 20 f2 73 |.calc_da|y..F? .s|
|00000160| 74 61 72 74 75 70 5f 6d | 65 6d 3a f2 67 72 61 62 |tartup_m|em:.grab|
|00000170| 5f 73 65 74 75 70 3a f2 | 72 65 61 64 66 6f 6e 74 |_setup:.|readfont|
|00000180| 73 3a f2 66 6f 6e 74 6d | 65 6e 75 28 66 6f 6e 74 |s:.fontm|enu(font|
|00000190| 6d 65 6e 75 25 2c 31 29 | 0d 00 50 3d 20 f2 63 6f |menu%,1)|..P= .co|
|000001a0| 6c 6f 75 72 6d 65 6e 75 | 28 63 6f 6c 6d 65 6e 75 |lourmenu|(colmenu|
|000001b0| 2c 31 29 3a f2 6d 61 69 | 6e 6d 65 6e 75 32 28 6d |,1):.mai|nmenu2(m|
|000001c0| 6d 32 25 29 3a f2 6d 61 | 69 6e 6d 65 6e 75 33 28 |m2%):.ma|inmenu3(|
|000001d0| 6d 6d 33 25 29 0d 00 5a | 19 20 f2 6d 61 74 63 68 |mm3%)..Z|. .match|
|000001e0| 5f 75 70 3a f2 73 74 79 | 5f 62 6c 61 6e 6b 0d 00 |_up:.sty|_blank..|
|000001f0| 64 80 20 f2 62 6f 72 64 | 65 72 73 28 62 6f 72 64 |d. .bord|ers(bord|
|00000200| 65 72 5f 70 61 74 68 24 | 29 3a e7 20 62 6f 72 64 |er_path$|):. bord|
|00000210| 65 72 73 24 28 31 29 3d | 22 4e 6f 6e 65 22 20 62 |ers$(1)=|"None" b|
|00000220| 6f 72 64 65 72 5f 70 61 | 74 68 24 3d 73 75 70 5f |order_pa|th$=sup_|
|00000230| 70 61 74 68 24 2b 22 62 | 6f 72 64 65 72 73 22 3a |path$+"b|orders":|
|00000240| 64 65 66 61 75 6c 74 5f | 70 24 3d 62 6f 72 64 65 |default_|p$=borde|
|00000250| 72 5f 70 61 74 68 24 3a | f2 62 6f 72 64 65 72 73 |r_path$:|.borders|
|00000260| 28 62 6f 72 64 65 72 5f | 70 61 74 68 24 29 0d 00 |(border_|path$)..|
|00000270| 6e 04 0d 00 78 24 20 ee | 20 85 20 e7 20 a4 77 69 |n...x$ .| . . .wi|
|00000280| 6d 70 65 72 72 6f 72 20 | c8 98 20 8b 20 f2 65 72 |mperror |.. . .er|
|00000290| 72 6f 72 3a c8 98 0d 00 | 82 2a 20 f2 6d 61 69 6e |ror:....|.* .main|
|000002a0| 6d 65 6e 75 28 6d 6d 65 | 6e 75 25 29 3a c8 99 22 |menu(mme|nu%):.."|
|000002b0| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|000002c0| 0d 00 8c 12 20 e7 20 63 | 6f 6d 64 24 3c 3e 22 22 |.... . c|omd$<>""|
|000002d0| 20 8c 0d 00 96 64 20 20 | f2 6f 70 65 6e 6d 61 69 | ....d |.openmai|
|000002e0| 6e 3a f2 6d 69 6e 69 5f | 70 6f 6c 6c 3a f2 6c 6f |n:.mini_|poll:.lo|
|000002f0| 61 64 28 63 6f 6d 64 24 | 29 3a e7 20 c2 63 6f 6d |ad(comd$|):. .com|
|00000300| 64 24 2c 37 29 3c 3e 22 | 41 5a 66 61 75 6c 74 22 |d$,7)<>"|AZfault"|
|00000310| 20 24 6e 61 6d 65 25 3d | 63 6f 6d 64 24 3a f2 75 | $name%=|comd$:.u|
|00000320| 70 64 61 74 65 5f 74 69 | 74 6c 65 3a 73 61 76 65 |pdate_ti|tle:save|
|00000330| 64 5f 6f 6b 3d b9 0d 00 | a0 06 20 cc 0d 00 aa 45 |d_ok=...|.. ....E|
|00000340| 20 20 69 6d 5f 74 79 70 | 65 24 3d 22 62 6f 72 64 | im_typ|e$="bord|
|00000350| 65 72 22 3a 44 4e 24 3d | 28 70 61 74 68 24 2b 22 |er":DN$=|(path$+"|
|00000360| 2e 62 61 6e 6e 65 72 31 | 22 29 3a f2 69 6d 70 6f |.banner1|"):.impo|
|00000370| 72 74 5f 66 69 6c 65 3a | f2 73 74 79 6c 65 28 31 |rt_file:|.style(1|
|00000380| 29 0d 00 b4 3b 20 20 24 | 6e 61 6d 65 25 3d 22 42 |)...; $|name%="B|
|00000390| 69 72 74 68 64 61 79 20 | 3c 75 6e 74 69 74 6c 65 |irthday |<untitle|
|000003a0| 64 3e 22 3a 73 61 76 65 | 64 5f 6f 6b 3d b9 3a f2 |d>":save|d_ok=.:.|
|000003b0| 75 70 64 61 74 65 5f 74 | 69 74 6c 65 0d 00 be 06 |update_t|itle....|
|000003c0| 20 cd 0d 00 c8 27 20 c8 | 99 22 4f 53 5f 52 65 61 | ....' .|."OS_Rea|
|000003d0| 64 4d 6f 6e 6f 74 6f 6e | 69 63 54 69 6d 65 22 20 |dMonoton|icTime" |
|000003e0| b8 20 64 6a 74 69 6d 65 | 25 0d 00 d2 26 20 e7 20 |. djtime|%...& . |
|000003f0| 63 6f 6d 64 24 3c 3e 22 | 22 20 63 6c 6f 73 65 64 |comd$<>"|" closed|
|00000400| 25 3d a3 20 8b 20 63 6c | 6f 73 65 64 25 3d b9 0d |%=. . cl|osed%=..|
|00000410| 00 dc 1e 20 ee 20 85 20 | e7 20 a4 77 69 6d 70 65 |... . . |. .wimpe|
|00000420| 72 72 6f 72 20 8b 20 f2 | 65 72 72 6f 72 0d 00 e6 |rror . .|error...|
|00000430| 06 20 f5 0d 00 f0 32 20 | 20 e7 20 63 6c 6f 73 65 |. ....2 | . close|
|00000440| 64 25 20 f2 69 63 6f 6e | 62 61 72 77 61 69 74 3a |d% .icon|barwait:|
|00000450| e7 20 71 75 69 74 25 3d | b9 20 f2 63 6c 6f 73 65 |. quit%=|. .close|
|00000460| 5f 64 6f 77 6e 0d 00 f1 | 0d 20 20 f2 72 65 67 62 |_down...|. .regb|
|00000470| 6f 78 0d 00 fa 30 20 20 | f2 6f 70 65 6e 77 69 6e |ox...0 |.openwin|
|00000480| 64 6f 77 28 77 68 61 6e | 64 6c 65 31 25 29 3a f2 |dow(whan|dle1%):.|
|00000490| 63 61 72 65 74 28 39 2c | 77 68 61 6e 64 6c 65 31 |caret(9,|whandle1|
|000004a0| 25 29 0d 01 0e 1e 20 20 | 71 75 69 74 25 3d a3 3a |%).... |quit%=.:|
|000004b0| 63 6c 6f 73 65 64 25 3d | a3 3a 65 6e 64 25 3d a3 |closed%=|.:end%=.|
|000004c0| 0d 01 18 07 20 20 f5 0d | 01 2c 0c 20 20 20 f2 70 |.... ..|.,. .p|
|000004d0| 6f 6c 6c 0d 01 36 1e 20 | 20 fd 20 71 75 69 74 25 |oll..6. | . quit%|
|000004e0| 20 84 20 63 6c 6f 73 65 | 64 25 20 84 20 65 6e 64 | . close|d% . end|
|000004f0| 25 0d 01 40 19 20 20 e7 | 20 71 75 69 74 25 20 f2 |%..@. .| quit% .|
|00000500| 63 6c 6f 73 65 5f 64 6f | 77 6e 0d 01 4a 31 20 20 |close_do|wn..J1 |
|00000510| 63 6c 6f 73 65 64 25 3d | b9 3a f2 63 6c 6f 73 65 |closed%=|.:.close|
|00000520| 61 6c 6c 3a c8 99 22 57 | 69 6d 70 5f 43 72 65 61 |all:.."W|imp_Crea|
|00000530| 74 65 4d 65 6e 75 22 2c | 2c 2d 31 0d 01 54 0e 20 |teMenu",|,-1..T. |
|00000540| fd 20 71 75 69 74 25 3d | b9 0d 01 5e 10 20 f4 2d |. quit%=|...^. .-|
|00000550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 01 68 11 20 dd f2 |--------|-..h. ..|
|00000560| 63 6c 6f 73 65 5f 64 6f | 77 6e 0d 01 6d 0c 20 f2 |close_do|wn..m. .|
|00000570| 72 65 67 62 6f 78 0d 01 | 72 2b 20 c8 99 22 4d 65 |regbox..|r+ .."Me|
|00000580| 73 73 61 67 65 54 72 61 | 6e 73 5f 43 6c 6f 73 65 |ssageTra|ns_Close|
|00000590| 46 69 6c 65 22 2c 6d 65 | 73 73 61 67 65 5f 70 74 |File",me|ssage_pt|
|000005a0| 72 0d 01 7c 23 20 c8 99 | 22 58 4f 53 5f 4d 6f 64 |r..|# ..|"XOS_Mod|
|000005b0| 75 6c 65 22 2c 37 2c 2c | 6d 65 73 73 61 67 65 5f |ule",7,,|message_|
|000005c0| 61 72 65 61 0d 01 86 21 | 20 c8 99 22 58 4f 53 5f |area...!| .."XOS_|
|000005d0| 4d 6f 64 75 6c 65 22 2c | 37 2c 2c 68 65 6c 70 70 |Module",|7,,helpp|
|000005e0| 5f 61 72 65 61 0d 01 90 | 29 20 c8 99 22 4d 65 73 |_area...|) .."Mes|
|000005f0| 73 61 67 65 54 72 61 6e | 73 5f 43 6c 6f 73 65 46 |sageTran|s_CloseF|
|00000600| 69 6c 65 22 2c 66 69 6c | 6d 73 5f 70 74 72 0d 01 |ile",fil|ms_ptr..|
|00000610| 9a 2a 20 c8 99 22 4d 65 | 73 73 61 67 65 54 72 61 |.* .."Me|ssageTra|
|00000620| 6e 73 5f 43 6c 6f 73 65 | 46 69 6c 65 22 2c 73 63 |ns_Close|File",sc|
|00000630| 6f 70 65 73 5f 70 74 72 | 0d 01 a4 2a 20 c8 99 22 |opes_ptr|...* .."|
|00000640| 4d 65 73 73 61 67 65 54 | 72 61 6e 73 5f 43 6c 6f |MessageT|rans_Clo|
|00000650| 73 65 46 69 6c 65 22 2c | 73 70 6f 72 74 73 5f 70 |seFile",|sports_p|
|00000660| 74 72 0d 01 ae 29 20 c8 | 99 22 4d 65 73 73 61 67 |tr...) .|."Messag|
|00000670| 65 54 72 61 6e 73 5f 43 | 6c 6f 73 65 46 69 6c 65 |eTrans_C|loseFile|
|00000680| 22 2c 73 6f 6e 67 73 5f | 70 74 72 0d 01 b8 37 20 |",songs_|ptr...7 |
|00000690| 24 62 6c 6f 63 6b 25 3d | 22 54 41 53 4b 22 3a c8 |$block%=|"TASK":.|
|000006a0| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e |."Wimp_C|loseDown|
|000006b0| 22 2c 74 61 73 6b 25 2c | 21 62 6c 6f 63 6b 25 3a |",task%,|!block%:|
|000006c0| c8 98 0d 01 c2 06 20 e1 | 0d 01 cc 10 20 f4 2d 2d |...... .|.... .--|
|000006d0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 01 d6 12 20 dd f2 69 |--------|.... ..i|
|000006e0| 63 6f 6e 62 61 72 77 61 | 69 74 0d 01 e0 1d 20 65 |conbarwa|it.... e|
|000006f0| 6e 64 25 3d a3 3a 63 6c | 6f 73 65 64 25 3d a3 3a |nd%=.:cl|osed%=.:|
|00000700| 71 75 69 74 25 3d a3 0d | 01 ea 06 20 f5 0d 02 1c |quit%=..|... ....|
|00000710| 24 20 c8 99 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c |$ .."Wim|p_Poll",|
|00000720| 2c 62 6c 6f 63 6b 25 20 | b8 20 72 65 61 73 6f 6e |,block% |. reason|
|00000730| 25 0d 02 26 11 20 c8 8e | 20 72 65 61 73 6f 6e 25 |%..&. ..| reason%|
|00000740| 20 ca 0d 02 30 10 20 20 | c9 20 36 3a f2 6d 6f 75 | ...0. |. 6:.mou|
|00000750| 73 65 0d 02 3a 27 20 20 | c9 20 38 3a c8 99 22 57 |se..:' |. 8:.."W|
|00000760| 69 6d 70 5f 50 72 6f 63 | 65 73 73 4b 65 79 22 2c |imp_Proc|essKey",|
|00000770| 62 6c 6f 63 6b 25 21 32 | 34 0d 02 44 19 20 20 c9 |block%!2|4..D. .|
|00000780| 20 39 3a f2 69 63 6f 6e | 62 61 72 6f 70 74 69 6f | 9:.icon|baroptio|
|00000790| 6e 73 0d 02 4e 1a 20 20 | c9 20 31 37 2c 31 38 3a |ns..N. |. 17,18:|
|000007a0| f2 69 63 6f 6e 72 65 63 | 65 69 76 65 0d 02 58 06 |.iconrec|eive..X.|
|000007b0| 20 cb 0d 02 62 13 20 fd | 20 65 6e 64 25 20 84 20 | ...b. .| end% . |
|000007c0| 71 75 69 74 25 0d 02 6c | 06 20 e1 0d 02 76 11 20 |quit%..l|. ...v. |
|000007d0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 02 80 15 |.-------|----....|
|000007e0| 20 dd f2 69 63 6f 6e 62 | 61 72 6f 70 74 69 6f 6e | ..iconb|aroption|
|000007f0| 73 0d 02 8a 14 20 63 68 | 6f 69 63 65 25 3d 21 62 |s.... ch|oice%=!b|
|00000800| 6c 6f 63 6b 25 0d 02 94 | 21 20 e7 20 63 68 6f 69 |lock%...|! . choi|
|00000810| 63 65 25 3d 31 20 f2 76 | 65 72 69 66 79 73 68 75 |ce%=1 .v|erifyshu|
|00000820| 74 64 6f 77 6e 32 0d 02 | 9e 06 20 e1 0d 02 a8 10 |tdown2..|.. .....|
|00000830| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 02 b2 12 | .------|----....|
|00000840| 20 dd f2 69 63 6f 6e 72 | 65 63 65 69 76 65 0d 02 | ..iconr|eceive..|
|00000850| bc 13 20 c8 8e 20 62 6c | 6f 63 6b 25 21 31 36 20 |.. .. bl|ock%!16 |
|00000860| ca 0d 02 c6 13 20 20 c9 | 20 30 3a 71 75 69 74 25 |..... .| 0:quit%|
|00000870| 3d b9 3a e1 0d 02 d0 09 | 20 20 c9 20 33 0d 02 da |=.:.....| . 3...|
|00000880| 1a 20 20 20 e7 20 62 6c | 6f 63 6b 25 21 34 30 3d |. . bl|ock%!40=|
|00000890| 26 32 30 30 30 20 8c 0d | 02 e4 1e 20 20 20 20 65 |&2000 ..|... e|
|000008a0| 6e 64 25 3d b9 3a f2 64 | 72 61 67 3a f2 6f 70 65 |nd%=.:.d|rag:.ope|
|000008b0| 6e 6d 61 69 6e 0d 02 ee | 08 20 20 20 cd 0d 02 f8 |nmain...|. ....|
|000008c0| 1d 20 20 c9 20 26 34 30 | 30 43 31 3a f2 6d 6f 64 |. . &40|0C1:.mod|
|000008d0| 65 5f 63 68 61 6e 67 65 | 64 32 0d 03 02 06 20 cb |e_change|d2.... .|
|000008e0| 0d 03 0c 06 20 e1 0d 03 | 16 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|000008f0| 2d 2d 2d 2d 2d 2d 0d 03 | 20 0f 20 dd f2 63 6c 6f |------..| . ..clo|
|00000900| 73 65 61 6c 6c 0d 03 2a | 34 20 62 6c 6f 63 6b 25 |seall..*|4 block%|
|00000910| 21 30 3d 77 68 61 6e 64 | 6c 65 31 25 3a c8 99 22 |!0=whand|le1%:.."|
|00000920| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00000930| 22 2c 2c 62 6c 6f 63 6b | 25 0d 03 34 42 20 62 6c |",,block|%..4B bl|
|00000940| 6f 63 6b 25 21 30 3d 76 | 69 65 77 5f 77 69 6e 25 |ock%!0=v|iew_win%|
|00000950| 3a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |:.."Wimp|_CloseWi|
|00000960| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 3a 76 69 |ndow",,b|lock%:vi|
|00000970| 65 77 5f 73 74 61 74 75 | 73 3d 30 0d 03 3e 35 20 |ew_statu|s=0..>5 |
|00000980| 62 6c 6f 63 6b 25 21 30 | 3d 73 63 61 6c 65 5f 77 |block%!0|=scale_w|
|00000990| 69 6e 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |in%:.."W|imp_Clos|
|000009a0| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|000009b0| 0d 03 48 34 20 62 6c 6f | 63 6b 25 21 30 3d 66 6f |..H4 blo|ck%!0=fo|
|000009c0| 6e 74 5f 77 69 6e 25 3a | c8 99 22 57 69 6d 70 5f |nt_win%:|.."Wimp_|
|000009d0| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|000009e0| 6f 63 6b 25 0d 03 52 35 | 20 62 6c 6f 63 6b 25 21 |ock%..R5| block%!|
|000009f0| 30 3d 70 72 69 6e 74 5f | 77 69 6e 25 3a c8 99 22 |0=print_|win%:.."|
|00000a00| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00000a10| 22 2c 2c 62 6c 6f 63 6b | 25 0d 03 5c 35 20 62 6c |",,block|%..\5 bl|
|00000a20| 6f 63 6b 25 21 30 3d 73 | 61 76 65 32 5f 77 69 6e |ock%!0=s|ave2_win|
|00000a30| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|00000a40| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 03 |indow",,|block%..|
|00000a50| 66 34 20 62 6c 6f 63 6b | 25 21 30 3d 73 61 76 65 |f4 block|%!0=save|
|00000a60| 5f 77 69 6e 25 3a c8 99 | 22 57 69 6d 70 5f 43 6c |_win%:..|"Wimp_Cl|
|00000a70| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00000a80| 6b 25 0d 03 70 06 20 e1 | 0d 03 7a 10 20 f4 2d 2d |k%..p. .|..z. .--|
|00000a90| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 03 84 13 20 dd f2 6d |--------|.... ..m|
|00000aa0| 6f 64 65 5f 63 68 61 6e | 67 65 64 0d 03 8e 3e 20 |ode_chan|ged...> |
|00000ab0| 69 6e 25 21 30 3d 31 32 | 3a 69 6e 25 21 34 3d 35 |in%!0=12|:in%!4=5|
|00000ac0| 3a 69 6e 25 21 38 3d 2d | 31 3a c8 99 22 4f 53 5f |:in%!8=-|1:.."OS_|
|00000ad0| 52 65 61 64 56 64 75 56 | 61 72 69 61 62 6c 65 73 |ReadVduV|ariables|
|00000ae0| 22 2c 69 6e 25 2c 6f 75 | 25 0d 03 98 2a 20 74 6f |",in%,ou|%...* to|
|00000af0| 70 5f 79 3d 28 6f 75 25 | 21 30 29 2b 31 3a 74 6f |p_y=(ou%|!0)+1:to|
|00000b00| 70 5f 79 3d 28 32 5e 6f | 75 25 21 34 29 2a 74 6f |p_y=(2^o|u%!4)*to|
|00000b10| 70 5f 79 0d 03 a2 3e 20 | 69 6e 25 21 30 3d 31 31 |p_y...> |in%!0=11|
|00000b20| 3a 69 6e 25 21 34 3d 34 | 3a 69 6e 25 21 38 3d 2d |:in%!4=4|:in%!8=-|
|00000b30| 31 3a c8 99 22 4f 53 5f | 52 65 61 64 56 64 75 56 |1:.."OS_|ReadVduV|
|00000b40| 61 72 69 61 62 6c 65 73 | 22 2c 69 6e 25 2c 6f 75 |ariables|",in%,ou|
|00000b50| 25 0d 03 ac 2a 20 74 6f | 70 5f 78 3d 28 6f 75 25 |%...* to|p_x=(ou%|
|00000b60| 21 30 29 2b 31 3a 74 6f | 70 5f 78 3d 28 32 5e 6f |!0)+1:to|p_x=(2^o|
|00000b70| 75 25 21 34 29 2a 74 6f | 70 5f 78 0d 03 b6 2e 20 |u%!4)*to|p_x.... |
|00000b80| e7 20 6f 6c 64 5f 73 74 | 79 6c 65 5f 6d 6f 64 65 |. old_st|yle_mode|
|00000b90| 3c 3e eb 20 f2 67 72 61 | 62 5f 73 65 74 75 70 3a |<>. .gra|b_setup:|
|00000ba0| f2 73 74 79 6c 65 28 31 | 29 0d 03 c0 06 20 e1 0d |.style(1|).... ..|
|00000bb0| 03 ca 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00000bc0| 03 d4 14 20 dd f2 6d 6f | 64 65 5f 63 68 61 6e 67 |... ..mo|de_chang|
|00000bd0| 65 64 32 0d 03 de 3e 20 | 69 6e 25 21 30 3d 31 32 |ed2...> |in%!0=12|
|00000be0| 3a 69 6e 25 21 34 3d 35 | 3a 69 6e 25 21 38 3d 2d |:in%!4=5|:in%!8=-|
|00000bf0| 31 3a c8 99 22 4f 53 5f | 52 65 61 64 56 64 75 56 |1:.."OS_|ReadVduV|
|00000c00| 61 72 69 61 62 6c 65 73 | 22 2c 69 6e 25 2c 6f 75 |ariables|",in%,ou|
|00000c10| 25 0d 03 e8 2a 20 74 6f | 70 5f 79 3d 28 6f 75 25 |%...* to|p_y=(ou%|
|00000c20| 21 30 29 2b 31 3a 74 6f | 70 5f 79 3d 28 32 5e 6f |!0)+1:to|p_y=(2^o|
|00000c30| 75 25 21 34 29 2a 74 6f | 70 5f 79 0d 03 f2 2e 20 |u%!4)*to|p_y.... |
|00000c40| e7 20 6f 6c 64 5f 73 74 | 79 6c 65 5f 6d 6f 64 65 |. old_st|yle_mode|
|00000c50| 3c 3e eb 20 f2 67 72 61 | 62 5f 73 65 74 75 70 3a |<>. .gra|b_setup:|
|00000c60| f2 73 74 79 6c 65 28 31 | 29 0d 03 fc 06 20 e1 0d |.style(1|).... ..|
|00000c70| 04 06 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00000c80| 04 10 10 20 dd f2 6d 69 | 6e 69 5f 70 6f 6c 6c 0d |... ..mi|ni_poll.|
|00000c90| 04 1a 08 20 54 3d 30 0d | 04 24 06 20 f5 0d 04 2e |... T=0.|.$. ....|
|00000ca0| 28 20 20 c8 99 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 |( .."Wi|mp_Poll"|
|00000cb0| 2c 26 30 30 2c 62 6c 6f | 63 6b 25 20 b8 20 72 65 |,&00,blo|ck% . re|
|00000cc0| 61 73 6f 6e 25 0d 04 38 | 12 20 20 c8 8e 20 72 65 |ason%..8|. .. re|
|00000cd0| 61 73 6f 6e 25 20 ca 0d | 04 42 13 20 20 20 c9 20 |ason% ..|.B. . |
|00000ce0| 31 20 3a f2 72 65 64 72 | 61 77 0d 04 4c 27 20 20 |1 :.redr|aw..L' |
|00000cf0| 20 c9 20 32 20 3a c8 99 | 22 57 69 6d 70 5f 4f 70 | . 2 :..|"Wimp_Op|
|00000d00| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00000d10| 25 0d 04 56 07 20 20 cb | 0d 04 60 0a 20 20 54 2b |%..V. .|..`. T+|
|00000d20| 3d 31 0d 04 6a 0a 20 fd | 20 54 3e 33 0d 04 74 06 |=1..j. .| T>3..t.|
|00000d30| 20 e1 0d 04 7e 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ...~. .|--------|
|00000d40| 2d 2d 0d 04 88 0b 20 dd | f2 70 6f 6c 6c 0d 04 92 |--.... .|.poll...|
|00000d50| 10 20 f2 63 68 65 63 6b | 5f 6e 61 6d 65 0d 04 9c |. .check|_name...|
|00000d60| 24 20 c8 99 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c |$ .."Wim|p_Poll",|
|00000d70| 2c 62 6c 6f 63 6b 25 20 | b8 20 72 65 61 73 6f 6e |,block% |. reason|
|00000d80| 25 0d 04 a6 11 20 c8 8e | 20 72 65 61 73 6f 6e 25 |%.... ..| reason%|
|00000d90| 20 ca 0d 04 b0 12 20 20 | c9 20 31 20 3a f2 72 65 | ..... |. 1 :.re|
|00000da0| 64 72 61 77 0d 04 ba 26 | 20 20 c9 20 32 20 3a c8 |draw...&| . 2 :.|
|00000db0| 99 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f |."Wimp_O|penWindo|
|00000dc0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 04 c4 17 20 20 |w",,bloc|k%.... |
|00000dd0| c9 20 33 20 3a f2 77 68 | 69 63 68 5f 63 6c 6f 73 |. 3 :.wh|ich_clos|
|00000de0| 65 0d 04 ce 15 20 20 c9 | 20 36 20 3a f2 65 64 69 |e.... .| 6 :.edi|
|00000df0| 74 6d 6f 75 73 65 0d 04 | d8 14 20 20 c9 20 37 20 |tmouse..|.. . 7 |
|00000e00| 3a f2 63 61 6c 6c 73 61 | 76 65 0d 04 e2 14 20 20 |:.callsa|ve.... |
|00000e10| c9 20 38 20 3a f2 6b 65 | 79 70 72 65 73 73 0d 04 |. 8 :.ke|ypress..|
|00000e20| ec 18 20 20 c9 20 39 20 | 3a f2 6f 70 74 69 6f 6e |.. . 9 |:.option|
|00000e30| 73 65 6c 65 63 74 0d 04 | f6 1a 20 20 c9 20 31 37 |select..|.. . 17|
|00000e40| 2c 31 38 3a f2 72 65 63 | 65 69 76 65 64 61 74 61 |,18:.rec|eivedata|
|00000e50| 0d 05 00 06 20 cb 0d 05 | 0a 20 20 e7 20 66 6f 6e |.... ...|. . fon|
|00000e60| 74 5f 6e 6f 74 3d 31 20 | f2 66 6f 6e 74 5f 6e 6f |t_not=1 |.font_no|
|00000e70| 74 66 6f 75 6e 64 0d 05 | 14 06 20 e1 0d 05 1e 10 |tfound..|.. .....|
|00000e80| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 05 28 12 | .------|----..(.|
|00000e90| 20 dd f2 77 68 69 63 68 | 5f 63 6c 6f 73 65 0d 05 | ..which|_close..|
|00000ea0| 32 41 20 e7 20 62 6c 6f | 63 6b 25 21 30 3c 3e 77 |2A . blo|ck%!0<>w|
|00000eb0| 68 61 6e 64 6c 65 31 25 | 20 c8 99 22 57 69 6d 70 |handle1%| .."Wimp|
|00000ec0| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00000ed0| 6e 22 2c 77 68 61 6e 64 | 6c 65 31 25 2c 2d 31 0d |n",whand|le1%,-1.|
|00000ee0| 05 3c 2d 20 e7 20 62 6c | 6f 63 6b 25 21 30 3d 77 |.<- . bl|ock%!0=w|
|00000ef0| 68 61 6e 64 6c 65 31 25 | 20 f2 63 6c 6f 73 65 61 |handle1%| .closea|
|00000f00| 6c 6c 3a 63 6c 6f 73 65 | 64 25 3d b9 0d 05 46 44 |ll:close|d%=...FD|
|00000f10| 20 e7 20 62 6c 6f 63 6b | 25 21 30 3d 76 69 65 77 | . block|%!0=view|
|00000f20| 5f 77 69 6e 25 20 c8 99 | 22 57 69 6d 70 5f 43 6c |_win% ..|"Wimp_Cl|
|00000f30| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00000f40| 6b 25 3a 76 69 65 77 5f | 73 74 61 74 75 73 3d 30 |k%:view_|status=0|
|00000f50| 0d 05 50 37 20 e7 20 62 | 6c 6f 63 6b 25 21 30 3d |..P7 . b|lock%!0=|
|00000f60| 73 63 61 6c 65 5f 77 69 | 6e 25 20 c8 99 22 57 69 |scale_wi|n% .."Wi|
|00000f70| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00000f80| 2c 62 6c 6f 63 6b 25 0d | 05 5a 36 20 e7 20 62 6c |,block%.|.Z6 . bl|
|00000f90| 6f 63 6b 25 21 30 3d 66 | 6f 6e 74 5f 77 69 6e 25 |ock%!0=f|ont_win%|
|00000fa0| 20 c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 | .."Wimp|_CloseWi|
|00000fb0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 05 64 |ndow",,b|lock%..d|
|00000fc0| 37 20 e7 20 62 6c 6f 63 | 6b 25 21 30 3d 70 72 69 |7 . bloc|k%!0=pri|
|00000fd0| 6e 74 5f 77 69 6e 25 20 | c8 99 22 57 69 6d 70 5f |nt_win% |.."Wimp_|
|00000fe0| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00000ff0| 6f 63 6b 25 0d 05 6e 06 | 20 e1 0d 05 78 10 20 f4 |ock%..n.| ...x. .|
|00001000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 05 82 0c 20 dd |--------|--.... .|
|00001010| f2 6d 6f 75 73 65 0d 05 | 8c 1b 20 78 25 3d 21 62 |.mouse..|.. x%=!b|
|00001020| 6c 6f 63 6b 25 3a 79 25 | 3d 62 6c 6f 63 6b 25 21 |lock%:y%|=block%!|
|00001030| 34 0d 05 96 0b 20 c8 8e | 20 b9 20 ca 0d 05 a0 14 |4.... ..| . .....|
|00001040| 20 20 c9 20 62 6c 6f 63 | 6b 25 21 31 32 3d 2d 32 | . bloc|k%!12=-2|
|00001050| 0d 05 aa 17 20 20 20 e7 | 20 62 6c 6f 63 6b 25 21 |.... .| block%!|
|00001060| 38 20 80 20 32 20 8c 0d | 05 b4 31 20 20 20 f2 72 |8 . 2 ..|..1 .r|
|00001070| 6d 28 22 4d 55 49 31 22 | 29 3a f2 64 72 61 77 6d |m("MUI1"|):.drawm|
|00001080| 65 6e 75 28 6d 65 6e 75 | 25 2c 74 65 78 74 24 2c |enu(menu|%,text$,|
|00001090| 78 25 2c 79 25 2c b9 29 | 0d 05 be 1f 20 20 cc 20 |x%,y%,.)|.... . |
|000010a0| e7 20 62 6c 6f 63 6b 25 | 21 38 20 80 20 35 20 8c |. block%|!8 . 5 .|
|000010b0| 20 65 6e 64 25 3d b9 0d | 05 c8 07 20 20 cd 0d 05 | end%=..|... ...|
|000010c0| d2 06 20 cb 0d 05 dc 06 | 20 e1 0d 05 e6 10 20 f4 |.. .....| ..... .|
|000010d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 05 f0 10 20 dd |--------|--.... .|
|000010e0| f2 65 64 69 74 6d 6f 75 | 73 65 0d 05 fa 48 20 78 |.editmou|se...H x|
|000010f0| 70 6f 73 3d 21 62 6c 6f | 63 6b 25 3a 79 70 6f 73 |pos=!blo|ck%:ypos|
|00001100| 3d 62 6c 6f 63 6b 25 21 | 34 3a 62 75 3d 62 6c 6f |=block%!|4:bu=blo|
|00001110| 63 6b 25 21 38 3a 77 69 | 6e 64 25 3d 62 6c 6f 63 |ck%!8:wi|nd%=bloc|
|00001120| 6b 25 21 31 32 3a 69 63 | 3d 62 6c 6f 63 6b 25 21 |k%!12:ic|=block%!|
|00001130| 31 36 0d 06 04 0b 20 4d | 55 24 3d 22 22 0d 06 0e |16.... M|U$=""...|
|00001140| 18 20 e7 20 77 69 6e 64 | 25 3d 2d 32 20 80 20 62 |. . wind|%=-2 . b|
|00001150| 75 3d 32 20 8c 0d 06 18 | 11 20 20 f2 72 6d 28 22 |u=2 ....|. .rm("|
|00001160| 4d 55 49 31 22 29 0d 06 | 22 35 20 20 f2 64 72 61 |MUI1")..|"5 .dra|
|00001170| 77 6d 65 6e 75 28 6d 65 | 6e 75 25 2c 74 65 78 74 |wmenu(me|nu%,text|
|00001180| 24 2c 78 70 6f 73 2c 79 | 70 6f 73 2c b9 29 3a 4d |$,xpos,y|pos,.):M|
|00001190| 55 24 3d 22 69 63 6f 6e | 22 3a e1 0d 06 2c 06 20 |U$="icon|":...,. |
|000011a0| cd 0d 06 36 86 20 e7 20 | 77 69 6e 64 25 3c 3e 73 |...6. . |wind%<>s|
|000011b0| 61 76 65 5f 77 69 6e 25 | 20 80 20 73 61 76 65 5f |ave_win%| . save_|
|000011c0| 74 6f 67 3d 31 20 62 6c | 6f 63 6b 25 21 30 3d 73 |tog=1 bl|ock%!0=s|
|000011d0| 61 76 65 5f 77 69 6e 25 | 3a c8 99 22 57 69 6d 70 |ave_win%|:.."Wimp|
|000011e0| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|000011f0| 6c 6f 63 6b 25 3a 73 61 | 76 65 5f 74 6f 67 3d 30 |lock%:sa|ve_tog=0|
|00001200| 3a c8 99 22 57 69 6d 70 | 5f 53 65 74 43 61 72 65 |:.."Wimp|_SetCare|
|00001210| 74 50 6f 73 69 74 69 6f | 6e 22 2c 77 68 61 6e 64 |tPositio|n",whand|
|00001220| 6c 65 31 25 2c 2d 31 0d | 06 40 0f 20 c8 8e 20 77 |le1%,-1.|.@. .. w|
|00001230| 69 6e 64 25 20 ca 0d 06 | 4a 25 20 f4 20 20 20 20 |ind% ...|J% . |
|00001240| 20 20 20 20 20 20 2a 2a | 2a 2a 20 4d 61 69 6e 20 | **|** Main |
|00001250| 57 69 6e 64 6f 77 20 2a | 2a 2a 2a 0d 06 54 10 20 |Window *|***..T. |
|00001260| c9 20 77 68 61 6e 64 6c | 65 31 25 0d 06 5e 66 20 |. whandl|e1%..^f |
|00001270| 62 6c 6f 63 6b 25 21 30 | 3d 73 61 76 65 5f 77 69 |block%!0|=save_wi|
|00001280| 6e 25 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |n%:.."Wi|mp_Close|
|00001290| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 3a |Window",|,block%:|
|000012a0| 73 61 76 65 5f 74 6f 67 | 3d 30 3a c8 99 22 57 69 |save_tog|=0:.."Wi|
|000012b0| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|000012c0| 69 6f 6e 22 2c 77 68 61 | 6e 64 6c 65 31 25 2c 2d |ion",wha|ndle1%,-|
|000012d0| 31 0d 06 68 57 20 e7 20 | 62 75 3d 32 20 f2 6d 61 |1..hW . |bu=2 .ma|
|000012e0| 69 6e 6d 65 6e 75 28 6d | 6d 65 6e 75 25 29 3a c8 |inmenu(m|menu%):.|
|000012f0| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|00001300| 75 22 2c 2c 6d 6d 65 6e | 75 25 2c 78 70 6f 73 2d |u",,mmen|u%,xpos-|
|00001310| 35 31 2c 79 70 6f 73 3a | 4d 55 24 3d 22 6d 61 69 |51,ypos:|MU$="mai|
|00001320| 6e 6d 65 6e 75 22 3a e1 | 0d 06 72 20 20 e7 20 69 |nmenu":.|..r . i|
|00001330| 63 3d 34 30 20 4d 55 24 | 3d 22 62 6f 72 64 65 72 |c=40 MU$|="border|
|00001340| 73 22 3a f2 71 32 3a e1 | 0d 06 7c 1a 20 e7 20 69 |s":.q2:.|..|. . i|
|00001350| 63 3d 32 38 20 f2 6d 6f | 6e 74 68 6d 65 6e 75 41 |c=28 .mo|nthmenuA|
|00001360| 3a e1 0d 06 86 22 20 e7 | 20 69 63 3d 33 30 20 84 |:...." .| ic=30 .|
|00001370| 20 69 63 3d 33 31 20 f2 | 6d 6f 64 69 66 79 5f 64 | ic=31 .|modify_d|
|00001380| 61 79 3a e1 0d 06 90 23 | 20 e7 20 69 63 3d 33 32 |ay:....#| . ic=32|
|00001390| 20 84 20 69 63 3d 33 33 | 20 f2 6d 6f 64 69 66 79 | . ic=33| .modify|
|000013a0| 5f 79 65 61 72 3a e1 0d | 06 9a 21 20 e7 20 69 63 |_year:..|..! . ic|
|000013b0| 3d 31 32 20 4d 55 24 3d | 22 6f 72 64 65 72 31 22 |=12 MU$=|"order1"|
|000013c0| 3a f2 71 31 28 31 32 29 | 0d 06 a4 21 20 e7 20 69 |:.q1(12)|...! . i|
|000013d0| 63 3d 32 32 20 4d 55 24 | 3d 22 6f 72 64 65 72 32 |c=22 MU$|="order2|
|000013e0| 22 3a f2 71 31 28 32 32 | 29 0d 06 ae 21 20 e7 20 |":.q1(22|)...! . |
|000013f0| 69 63 3d 32 39 20 4d 55 | 24 3d 22 6f 72 64 65 72 |ic=29 MU|$="order|
|00001400| 33 22 3a f2 71 31 28 32 | 39 29 0d 06 b8 21 20 e7 |3":.q1(2|9)...! .|
|00001410| 20 69 63 3d 31 34 20 4d | 55 24 3d 22 6f 72 64 65 | ic=14 M|U$="orde|
|00001420| 72 34 22 3a f2 71 31 28 | 31 34 29 0d 06 c2 21 20 |r4":.q1(|14)...! |
|00001430| e7 20 69 63 3d 31 35 20 | 4d 55 24 3d 22 6f 72 64 |. ic=15 |MU$="ord|
|00001440| 65 72 35 22 3a f2 71 31 | 28 31 35 29 0d 06 c4 0e |er5":.q1|(15)....|
|00001450| 20 e7 20 69 63 3d 33 39 | 20 8c 0d 06 c5 23 20 20 | . ic=39| ....# |
|00001460| f2 7a 32 28 33 36 2c 77 | 68 61 6e 64 6c 65 31 25 |.z2(36,w|handle1%|
|00001470| 29 3a f2 73 63 72 61 70 | 5f 65 6d 3a e1 0d 06 cb |):.scrap|_em:....|
|00001480| 06 20 cd 0d 06 cc 0e 20 | e7 20 69 63 3d 33 37 20 |. ..... |. ic=37 |
|00001490| 8c 0d 06 d6 4b 20 20 f2 | 6d 69 6e 69 5f 70 6f 6c |....K .|mini_pol|
|000014a0| 6c 3a f2 7a 31 28 33 35 | 2c 77 68 61 6e 64 6c 65 |l:.z1(35|,whandle|
|000014b0| 31 25 29 3a f2 6d 69 6e | 69 5f 70 6f 6c 6c 3a f2 |1%):.min|i_poll:.|
|000014c0| 63 61 6c 63 5f 64 61 79 | 3a f2 69 72 65 61 64 28 |calc_day|:.iread(|
|000014d0| 39 2c 77 68 61 6e 64 6c | 65 31 25 29 0d 06 e0 33 |9,whandl|e1%)...3|
|000014e0| 20 20 e7 20 61 24 3d 22 | 22 20 f2 72 6d 28 22 45 | . a$="|" .rm("E|
|000014f0| 52 52 32 22 29 3a f2 65 | 72 72 62 6f 78 28 74 65 |RR2"):.e|rrbox(te|
|00001500| 78 74 24 29 3a f2 6d 69 | 6e 69 5f 70 6f 6c 6c 0d |xt$):.mi|ni_poll.|
|00001510| 06 ea 16 20 20 e7 20 63 | 61 6c 63 5f 61 62 6f 72 |... . c|alc_abor|
|00001520| 74 3d a3 20 8c 0d 06 f4 | 3c 20 20 20 f2 63 6c 69 |t=. ....|< .cli|
|00001530| 63 6b 5f 62 69 72 74 68 | 3a f2 63 6c 69 63 6b 5f |ck_birth|:.click_|
|00001540| 65 76 65 6e 74 73 3a f2 | 63 6c 69 63 6b 5f 66 69 |events:.|click_fi|
|00001550| 6c 6d 73 3a f2 63 6c 69 | 63 6b 5f 73 63 6f 70 65 |lms:.cli|ck_scope|
|00001560| 73 0d 06 fe 2a 20 20 20 | f2 72 65 61 64 5f 73 70 |s...* |.read_sp|
|00001570| 6f 72 74 73 3a f2 63 6c | 69 63 6b 5f 73 6f 6e 67 |orts:.cl|ick_song|
|00001580| 73 3a f2 73 74 79 6c 65 | 28 31 29 0d 07 08 07 20 |s:.style|(1).... |
|00001590| 20 cd 0d 07 12 04 0d 07 | 26 42 20 20 c8 99 22 57 | .......|&B .."W|
|000015a0| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|000015b0| 2c 77 68 61 6e 64 6c 65 | 31 25 2c 35 35 32 2c 2d |,whandle|1%,552,-|
|000015c0| 36 39 32 2c 39 39 30 2c | 2d 37 32 3a 73 61 76 65 |692,990,|-72:save|
|000015d0| 64 5f 6f 6b 3d a3 3a e1 | 0d 07 30 06 20 cd 0d 07 |d_ok=.:.|..0. ...|
|000015e0| 3a 04 0d 07 44 20 20 c9 | 20 73 61 76 65 5f 77 69 |:...D .| save_wi|
|000015f0| 6e 25 3a f2 63 6c 69 63 | 6b 5f 64 72 61 67 73 61 |n%:.clic|k_dragsa|
|00001600| 76 65 0d 07 4e 22 20 c9 | 20 73 61 76 65 32 5f 77 |ve..N" .| save2_w|
|00001610| 69 6e 25 3a f2 63 6c 69 | 63 6b 5f 64 72 61 67 73 |in%:.cli|ck_drags|
|00001620| 61 76 65 32 0d 07 58 10 | 20 c9 20 76 69 65 77 5f |ave2..X.| . view_|
|00001630| 77 69 6e 25 0d 07 62 66 | 20 62 6c 6f 63 6b 25 21 |win%..bf| block%!|
|00001640| 30 3d 73 61 76 65 5f 77 | 69 6e 25 3a c8 99 22 57 |0=save_w|in%:.."W|
|00001650| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00001660| 2c 2c 62 6c 6f 63 6b 25 | 3a 73 61 76 65 5f 74 6f |,,block%|:save_to|
|00001670| 67 3d 30 3a c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |g=0:.."W|imp_SetC|
|00001680| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 77 68 |aretPosi|tion",wh|
|00001690| 61 6e 64 6c 65 31 25 2c | 2d 31 0d 07 6c 57 20 e7 |andle1%,|-1..lW .|
|000016a0| 20 62 75 3d 32 20 f2 6d | 61 69 6e 6d 65 6e 75 28 | bu=2 .m|ainmenu(|
|000016b0| 6d 6d 65 6e 75 25 29 3a | c8 99 22 57 69 6d 70 5f |mmenu%):|.."Wimp_|
|000016c0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 6d 6d 65 |CreateMe|nu",,mme|
|000016d0| 6e 75 25 2c 78 70 6f 73 | 2d 35 31 2c 79 70 6f 73 |nu%,xpos|-51,ypos|
|000016e0| 3a 4d 55 24 3d 22 6d 61 | 69 6e 6d 65 6e 75 22 3a |:MU$="ma|inmenu":|
|000016f0| e1 0d 07 76 1e 20 c9 20 | 73 63 61 6c 65 5f 77 69 |...v. . |scale_wi|
|00001700| 6e 25 3a f2 63 6c 69 63 | 6b 5f 73 63 61 6c 65 0d |n%:.clic|k_scale.|
|00001710| 07 80 1c 20 c9 20 66 6f | 6e 74 5f 77 69 6e 25 3a |... . fo|nt_win%:|
|00001720| f2 63 6c 69 63 6b 5f 66 | 6f 6e 74 0d 07 8a 1e 20 |.click_f|ont.... |
|00001730| c9 20 70 72 69 6e 74 5f | 77 69 6e 25 3a f2 63 6c |. print_|win%:.cl|
|00001740| 69 63 6b 5f 70 72 69 6e | 74 0d 07 94 06 20 cb 0d |ick_prin|t.... ..|
|00001750| 07 9e 06 20 e1 0d 07 a8 | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00001760| 2d 2d 2d 2d 2d 0d 07 b2 | 14 20 dd f2 63 61 72 65 |-----...|. ..care|
|00001770| 74 28 43 25 2c 77 68 25 | 29 0d 07 bc 28 20 f2 69 |t(C%,wh%|)...( .i|
|00001780| 72 65 61 64 28 43 25 2c | 77 68 25 29 3a e7 20 61 |read(C%,|wh%):. a|
|00001790| 24 3d 22 22 20 6c 3d 2d | 31 20 8b 20 6c 3d a9 61 |$="" l=-|1 . l=.a|
|000017a0| 24 0d 07 c6 2d 20 c8 99 | 22 57 69 6d 70 5f 53 65 |$...- ..|"Wimp_Se|
|000017b0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|000017c0| 77 68 25 2c 43 25 2c 30 | 2c 2c 2d 31 2c 6c 0d 07 |wh%,C%,0|,,-1,l..|
|000017d0| d0 06 20 e1 0d 07 da 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|000017e0| 2d 2d 2d 2d 0d 07 e4 28 | 20 dd f2 70 69 63 74 75 |----...(| ..pictu|
|000017f0| 72 65 28 58 53 49 5a 45 | 2c 59 53 49 5a 45 2c 73 |re(XSIZE|,YSIZE,s|
|00001800| 73 73 70 61 63 65 2c 73 | 73 73 24 29 0d 07 ee 08 |sspace,s|ss$)....|
|00001810| 20 ea 20 85 0d 07 f8 23 | 20 ee 20 85 20 ea 3a f7 | . ....#| . . .:.|
|00001820| 20 85 3a ef 32 36 3a db | 3a f1 f6 24 3a f1 c3 9e | .:.26:.|:..$:...|
|00001830| 3a 5a 24 3d be 3a e1 0d | 08 02 13 20 24 73 70 72 |:Z$=.:..|... $spr|
|00001840| 6e 61 6d 65 25 3d 73 73 | 73 24 0d 08 0c 10 20 e7 |name%=ss|s$.... .|
|00001850| 20 73 73 73 24 3d 22 22 | 20 8c 0d 08 16 37 20 20 | sss$=""| ....7 |
|00001860| c8 99 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |.."OS_Sp|riteOp",|
|00001870| 32 36 39 2c 73 73 73 70 | 61 63 65 2c 73 70 72 6e |269,sssp|ace,sprn|
|00001880| 61 6d 65 25 2c 31 33 2c | 31 20 b8 20 2c 2c 2c 52 |ame%,13,|1 . ,,,R|
|00001890| 33 0d 08 20 17 20 20 3f | 28 73 70 72 6e 61 6d 65 |3.. . ?|(sprname|
|000018a0| 25 2b 52 33 29 3d 31 33 | 0d 08 2a 06 20 cd 0d 08 |%+R3)=13|..*. ...|
|000018b0| 34 33 20 c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |43 .."OS|_SpriteO|
|000018c0| 70 22 2c 32 38 30 2c 73 | 73 73 70 61 63 65 2c 24 |p",280,s|sspace,$|
|000018d0| 73 70 72 6e 61 6d 65 25 | 20 b8 20 2c 2c 61 64 64 |sprname%| . ,,add|
|000018e0| 25 0d 08 3e 3a 20 c8 99 | 22 4f 53 5f 53 70 72 69 |%..>: ..|"OS_Spri|
|000018f0| 74 65 4f 70 22 2c 35 35 | 32 2c 73 73 73 70 61 63 |teOp",55|2,ssspac|
|00001900| 65 2c 61 64 64 25 20 b8 | 20 2c 2c 2c 73 78 25 2c |e,add% .| ,,,sx%,|
|00001910| 73 79 25 2c 2c 73 6d 6f | 64 65 25 0d 08 48 16 20 |sy%,,smo|de%..H. |
|00001920| 65 25 3d 28 61 64 64 25 | 21 33 32 2d 34 34 29 2f |e%=(add%|!32-44)/|
|00001930| 38 0d 08 52 12 20 70 61 | 6c 25 3d 70 61 6c 62 75 |8..R. pa|l%=palbu|
|00001940| 66 66 25 0d 08 5c 04 0d | 08 66 0c 20 c8 8e 20 65 |ff%..\..|.f. .. e|
|00001950| 25 20 ca 0d 08 70 09 20 | 20 c9 20 30 0d 08 7a 2e |% ...p. | . 0..z.|
|00001960| 20 20 c8 99 22 4f 53 5f | 52 65 61 64 4d 6f 64 65 | .."OS_|ReadMode|
|00001970| 56 61 72 69 61 62 6c 65 | 22 2c 73 6d 6f 64 65 25 |Variable|",smode%|
|00001980| 2c 39 20 b8 20 2c 2c 70 | 70 25 0d 08 84 0e 20 20 |,9 . ,,p|p%.... |
|00001990| c8 8e 20 70 70 25 20 ca | 0d 08 8e 13 20 20 20 c9 |.. pp% .|.... .|
|000019a0| 20 30 3a 70 61 6c 25 3d | 70 30 25 0d 08 98 13 20 | 0:pal%=|p0%.... |
|000019b0| 20 20 c9 20 31 3a 70 61 | 6c 25 3d 70 31 25 0d 08 | . 1:pa|l%=p1%..|
|000019c0| a2 13 20 20 20 c9 20 32 | 3a 70 61 6c 25 3d 70 32 |.. . 2|:pal%=p2|
|000019d0| 25 0d 08 ac 13 20 20 20 | c9 20 33 3a 70 61 6c 25 |%.... |. 3:pal%|
|000019e0| 3d 70 33 25 0d 08 b6 06 | 20 cb 0d 08 c0 04 0d 08 |=p3%....| .......|
|000019f0| ca 0d 20 c9 20 32 2c 34 | 2c 31 36 0d 08 d4 13 20 |.. . 2,4|,16.... |
|00001a00| 20 e3 20 69 25 3d 30 20 | b8 20 65 25 2d 31 0d 08 | . i%=0 |. e%-1..|
|00001a10| de 20 20 20 70 61 6c 25 | 21 28 69 25 2a 34 29 3d |. pal%|!(i%*4)=|
|00001a20| 61 64 64 25 21 28 34 34 | 2b 69 25 2a 38 29 0d 08 |add%!(44|+i%*8)..|
|00001a30| e8 0a 20 20 ed 20 69 25 | 0d 08 f2 09 20 c9 20 36 |.. . i%|.... . 6|
|00001a40| 34 0d 08 fc 3e 20 20 e3 | 20 67 72 61 62 25 3d 30 |4...> .| grab%=0|
|00001a50| 20 b8 20 32 30 34 38 2d | 38 20 88 20 38 3a 70 61 | . 2048-|8 . 8:pa|
|00001a60| 6c 25 21 28 67 72 61 62 | 25 3e 3e 31 29 3d 61 64 |l%!(grab|%>>1)=ad|
|00001a70| 64 25 21 28 67 72 61 62 | 25 2b 34 34 29 3a ed 0d |d%!(grab|%+44):..|
|00001a80| 09 06 06 20 cb 0d 09 10 | 04 0d 09 1a 12 20 e7 20 |... ....|..... . |
|00001a90| 73 6d 6f 64 65 25 3d 2d | 31 20 e1 0d 09 24 30 20 |smode%=-|1 ...$0 |
|00001aa0| e7 20 73 73 73 24 3d 22 | 69 6d 31 46 48 47 46 22 |. sss$="|im1FHGF"|
|00001ab0| 20 4b 75 3d 32 38 3a 4b | 75 70 3d 30 20 8b 20 4b | Ku=28:K|up=0 . K|
|00001ac0| 75 3d 2d 31 3a 4b 75 70 | 3d 2d 31 0d 09 2e 43 20 |u=-1:Kup|=-1...C |
|00001ad0| e7 20 65 25 3c 36 34 20 | c8 99 22 43 6f 6c 6f 75 |. e%<64 |.."Colou|
|00001ae0| 72 54 72 61 6e 73 5f 53 | 65 6c 65 63 74 54 61 62 |rTrans_S|electTab|
|00001af0| 6c 65 22 2c 73 6d 6f 64 | 65 25 2c 70 61 6c 25 2c |le",smod|e%,pal%,|
|00001b00| 4b 75 2c 4b 75 70 2c 74 | 72 61 6e 73 32 25 0d 09 |Ku,Kup,t|rans2%..|
|00001b10| 38 04 0d 09 42 0e 20 e7 | 20 65 25 3e 36 33 20 8c |8...B. .| e%>63 .|
|00001b20| 0d 09 4c 22 20 20 e3 20 | 51 25 3d 30 20 b8 20 32 |..L" . |Q%=0 . 2|
|00001b30| 35 35 3a 74 72 61 6e 73 | 32 25 3f 51 25 3d 51 25 |55:trans|2%?Q%=Q%|
|00001b40| 3a ed 0d 09 56 12 20 20 | e3 20 51 25 3d 30 20 b8 |:...V. |. Q%=0 .|
|00001b50| 20 32 35 35 0d 09 60 42 | 20 20 c8 99 22 43 6f 6c | 255..`B| .."Col|
|00001b60| 6f 75 72 54 72 61 6e 73 | 5f 52 65 74 75 72 6e 43 |ourTrans|_ReturnC|
|00001b70| 6f 6c 6f 75 72 4e 75 6d | 62 65 72 22 2c 70 61 6c |olourNum|ber",pal|
|00001b80| 25 21 28 51 25 3c 3c 32 | 29 20 b8 20 74 72 61 6e |%!(Q%<<2|) . tran|
|00001b90| 73 32 25 3f 51 25 0d 09 | 6a 07 20 20 ed 0d 09 74 |s2%?Q%..|j. ...t|
|00001ba0| 3c 20 20 c8 99 22 43 6f | 6c 6f 75 72 54 72 61 6e |< .."Co|lourTran|
|00001bb0| 73 5f 53 65 6c 65 63 74 | 54 61 62 6c 65 22 2c 73 |s_Select|Table",s|
|00001bc0| 6d 6f 64 65 25 2c 70 61 | 6c 25 2c 4b 75 2c 4b 75 |mode%,pa|l%,Ku,Ku|
|00001bd0| 70 2c 74 72 61 6e 73 32 | 25 0d 09 7e 06 20 cd 0d |p,trans2|%..~. ..|
|00001be0| 09 88 04 0d 09 92 2e 20 | c8 99 22 4f 53 5f 52 65 |....... |.."OS_Re|
|00001bf0| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 2c |adModeVa|riable",|
|00001c00| 73 6d 6f 64 65 25 2c 34 | 20 b8 20 2c 2c 78 6d 61 |smode%,4| . ,,xma|
|00001c10| 67 0d 09 9c 2e 20 c8 99 | 22 4f 53 5f 52 65 61 64 |g.... ..|"OS_Read|
|00001c20| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c 73 6d |ModeVari|able",sm|
|00001c30| 6f 64 65 25 2c 35 20 b8 | 20 2c 2c 79 6d 61 67 0d |ode%,5 .| ,,ymag.|
|00001c40| 09 a6 24 20 73 78 25 3d | 28 73 78 25 3c 3c 78 6d |..$ sx%=|(sx%<<xm|
|00001c50| 61 67 29 3a 73 79 25 3d | 28 73 79 25 3c 3c 79 6d |ag):sy%=|(sy%<<ym|
|00001c60| 61 67 29 0d 09 b0 04 0d | 09 ba 2b 20 c8 99 22 4f |ag).....|..+ .."O|
|00001c70| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|00001c80| 6c 65 22 2c 2d 31 2c 35 | 20 b8 20 2c 2c 79 6d 61 |le",-1,5| . ,,yma|
|00001c90| 67 32 0d 09 c4 2b 20 c8 | 99 22 4f 53 5f 52 65 61 |g2...+ .|."OS_Rea|
|00001ca0| 64 4d 6f 64 65 56 61 72 | 69 61 62 6c 65 22 2c 2d |dModeVar|iable",-|
|00001cb0| 31 2c 34 20 b8 20 2c 2c | 78 6d 61 67 32 0d 09 ce |1,4 . ,,|xmag2...|
|00001cc0| 30 20 f4 49 46 20 70 72 | 6e 74 5f 73 74 61 74 75 |0 .IF pr|nt_statu|
|00001cd0| 73 3d 31 20 78 6d 61 67 | 32 3d 78 73 74 69 6e 74 |s=1 xmag|2=xstint|
|00001ce0| 3a 79 6d 61 67 32 3d 79 | 73 74 69 6e 74 0d 09 d8 |:ymag2=y|stint...|
|00001cf0| 31 20 66 61 3d 28 32 5e | 79 6d 61 67 32 29 2f 28 |1 fa=(2^|ymag2)/(|
|00001d00| 32 5e 79 6d 61 67 29 3a | 66 61 32 3d 28 32 5e 78 |2^ymag):|fa2=(2^x|
|00001d10| 6d 61 67 32 29 2f 28 32 | 5e 78 6d 61 67 29 0d 09 |mag2)/(2|^xmag)..|
|00001d20| e2 04 0d 09 ec 26 20 72 | 61 74 69 6f 78 3d 58 53 |.....& r|atiox=XS|
|00001d30| 49 5a 45 2f 73 78 25 3a | 72 61 74 69 6f 79 3d 59 |IZE/sx%:|ratioy=Y|
|00001d40| 53 49 5a 45 2f 73 79 25 | 0d 09 f6 43 20 f4 49 46 |SIZE/sy%|...C .IF|
|00001d50| 20 72 61 74 69 6f 78 3c | 72 61 74 69 6f 79 20 73 | ratiox<|ratioy s|
|00001d60| 66 6e 25 3d 58 53 49 5a | 45 3a 73 66 64 25 3d 73 |fn%=XSIZ|E:sfd%=s|
|00001d70| 78 25 20 45 4c 53 45 20 | 73 66 6e 25 3d 59 53 49 |x% ELSE |sfn%=YSI|
|00001d80| 5a 45 3a 73 66 64 25 3d | 73 79 25 0d 0a 00 30 20 |ZE:sfd%=|sy%...0 |
|00001d90| 73 66 6e 31 25 3d 58 53 | 49 5a 45 3a 73 66 64 31 |sfn1%=XS|IZE:sfd1|
|00001da0| 25 3d 73 78 25 3a 73 66 | 6e 32 25 3d 59 53 49 5a |%=sx%:sf|n2%=YSIZ|
|00001db0| 45 3a 73 66 64 32 25 3d | 73 79 25 0d 0a 0a 3f 20 |E:sfd2%=|sy%...? |
|00001dc0| 21 6d 61 67 25 3d 73 66 | 6e 31 25 3a 6d 61 67 25 |!mag%=sf|n1%:mag%|
|00001dd0| 21 34 3d 73 66 6e 32 25 | 3a 6d 61 67 25 21 38 3d |!4=sfn2%|:mag%!8=|
|00001de0| 73 66 64 31 25 2a 66 61 | 32 3a 6d 61 67 25 21 31 |sfd1%*fa|2:mag%!1|
|00001df0| 32 3d 73 66 64 32 25 2a | 66 61 0d 0a 14 30 20 73 |2=sfd2%*|fa...0 s|
|00001e00| 78 25 3d 73 78 25 2a 28 | 73 66 6e 31 25 2f 73 66 |x%=sx%*(|sfn1%/sf|
|00001e10| 64 31 25 29 3a 73 79 25 | 3d 73 79 25 2a 28 73 66 |d1%):sy%|=sy%*(sf|
|00001e20| 6e 32 25 2f 73 66 64 32 | 25 29 0d 0a 1e 08 20 f7 |n2%/sfd2|%).... .|
|00001e30| 20 85 0d 0a 28 06 20 e1 | 0d 0a 32 10 20 f4 2d 2d | ...(. .|..2. .--|
|00001e40| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 0a 3c 15 20 dd f2 76 |--------|..<. ..v|
|00001e50| 65 72 69 66 79 73 68 75 | 74 64 6f 77 6e 0d 0a 46 |erifyshu|tdown..F|
|00001e60| 13 20 e7 20 73 61 76 65 | 64 5f 6f 6b 3d a3 20 8c |. . save|d_ok=. .|
|00001e70| 0d 0a 50 3a 20 20 f2 61 | 6c 65 72 74 32 28 22 59 |..P: .a|lert2("Y|
|00001e80| 6f 75 20 68 61 76 65 20 | 77 6f 72 6b 20 74 68 61 |ou have |work tha|
|00001e90| 74 20 68 61 73 20 6e 6f | 74 20 62 65 65 6e 20 73 |t has no|t been s|
|00001ea0| 61 76 65 64 20 79 65 74 | 22 29 0d 0a 5a 49 20 20 |aved yet|")..ZI |
|00001eb0| e7 20 61 6c 65 72 74 3d | 32 20 62 6c 6f 63 6b 25 |. alert=|2 block%|
|00001ec0| 21 30 3d 77 68 61 6e 64 | 6c 65 31 25 3a c8 99 22 |!0=whand|le1%:.."|
|00001ed0| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00001ee0| 22 2c 2c 62 6c 6f 63 6b | 25 3a 71 75 69 74 25 3d |",,block|%:quit%=|
|00001ef0| b9 3a e1 0d 0a 64 47 20 | 20 e7 20 61 6c 65 72 74 |.:...dG | . alert|
|00001f00| 3d 33 3a 73 61 76 65 5f | 74 6f 67 3d 31 3a f2 6f |=3:save_|tog=1:.o|
|00001f10| 70 65 6e 77 69 6e 64 6f | 77 28 73 61 76 65 5f 77 |penwindo|w(save_w|
|00001f20| 69 6e 25 29 3a f2 63 61 | 72 65 74 28 30 2c 73 61 |in%):.ca|ret(0,sa|
|00001f30| 76 65 5f 77 69 6e 25 29 | 3a e1 0d 0a 6e 06 20 cc |ve_win%)|:...n. .|
|00001f40| 0d 0a 78 3f 20 20 62 6c | 6f 63 6b 25 21 30 3d 77 |..x? bl|ock%!0=w|
|00001f50| 68 61 6e 64 6c 65 31 25 | 3a c8 99 22 57 69 6d 70 |handle1%|:.."Wimp|
|00001f60| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00001f70| 6c 6f 63 6b 25 3a 71 75 | 69 74 25 3d b9 3a e1 0d |lock%:qu|it%=.:..|
|00001f80| 0a 82 06 20 cd 0d 0a 8c | 06 20 e1 0d 0a 96 10 20 |... ....|. ..... |
|00001f90| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0a a0 13 20 |.-------|---.... |
|00001fa0| dd f2 6f 70 74 69 6f 6e | 73 65 6c 65 63 74 0d 0a |..option|select..|
|00001fb0| aa 59 20 63 68 6f 69 63 | 65 25 3d 21 62 6c 6f 63 |.Y choic|e%=!bloc|
|00001fc0| 6b 25 3a 63 68 6f 69 63 | 65 32 25 3d 62 6c 6f 63 |k%:choic|e2%=bloc|
|00001fd0| 6b 25 21 34 3a 63 68 6f | 69 63 65 33 25 3d 62 6c |k%!4:cho|ice3%=bl|
|00001fe0| 6f 63 6b 25 21 38 3a 63 | 68 6f 69 63 65 34 25 3d |ock%!8:c|hoice4%=|
|00001ff0| 62 6c 6f 63 6b 25 21 31 | 32 3a 63 72 65 61 74 65 |block%!1|2:create|
|00002000| 5f 6d 65 6e 75 3d 30 0d | 0a b4 55 20 e7 20 4d 55 |_menu=0.|..U . MU|
|00002010| 24 3d 22 65 66 31 22 20 | 84 20 4d 55 24 3d 22 65 |$="ef1" |. MU$="e|
|00002020| 66 32 22 20 84 20 4d 55 | 24 3d 22 65 66 33 22 20 |f2" . MU|$="ef3" |
|00002030| c8 99 22 57 69 6d 70 5f | 44 65 63 6f 64 65 4d 65 |.."Wimp_|DecodeMe|
|00002040| 6e 75 22 2c 2c 66 6f 6e | 74 6d 65 6e 75 25 2c 62 |nu",,fon|tmenu%,b|
|00002050| 6c 6f 63 6b 25 2c 66 5f | 61 6e 73 25 0d 0a be 24 |lock%,f_|ans%...$|
|00002060| 20 c8 99 22 57 69 6d 70 | 5f 47 65 74 50 6f 69 6e | .."Wimp|_GetPoin|
|00002070| 74 65 72 49 6e 66 6f 22 | 2c 2c 62 6c 6f 63 6b 25 |terInfo"|,,block%|
|00002080| 0d 0a c8 3a 20 78 70 6f | 73 3d 21 62 6c 6f 63 6b |...: xpo|s=!block|
|00002090| 25 3a 79 70 6f 73 3d 62 | 6c 6f 63 6b 25 21 34 3a |%:ypos=b|lock%!4:|
|000020a0| e7 20 62 6c 6f 63 6b 25 | 21 38 3d 31 20 63 72 65 |. block%|!8=1 cre|
|000020b0| 61 74 65 5f 6d 65 6e 75 | 3d 31 0d 0a d2 26 20 e7 |ate_menu|=1...& .|
|000020c0| 20 c0 4d 55 24 2c 35 29 | 3d 22 6f 72 64 65 72 22 | .MU$,5)|="order"|
|000020d0| 20 f2 6f 70 74 69 6f 6e | 5f 6f 72 64 65 72 3a e1 | .option|_order:.|
|000020e0| 0d 0a dc 28 20 e7 20 4d | 55 24 3d 22 6d 61 69 6e |...( . M|U$="main|
|000020f0| 6d 65 6e 75 22 20 f2 6f | 70 74 69 6f 6e 5f 6d 61 |menu" .o|ption_ma|
|00002100| 69 6e 6d 65 6e 75 3a e1 | 0d 0a e6 2a 20 e7 20 4d |inmenu:.|...* . M|
|00002110| 55 24 3d 22 6d 6f 6e 74 | 68 6d 65 6e 75 22 20 f2 |U$="mont|hmenu" .|
|00002120| 6f 70 74 69 6f 6e 5f 6d | 6f 6e 74 68 6d 65 6e 75 |option_m|onthmenu|
|00002130| 3a e1 0d 0a f0 37 20 e7 | 20 4d 55 24 3d 22 65 66 |:....7 .| MU$="ef|
|00002140| 31 22 20 84 20 4d 55 24 | 3d 22 65 66 32 22 20 84 |1" . MU$|="ef2" .|
|00002150| 20 4d 55 24 3d 22 65 66 | 33 22 20 f2 6f 70 74 69 | MU$="ef|3" .opti|
|00002160| 6f 6e 5f 66 6f 6e 74 3a | e1 0d 0a fa 26 20 e7 20 |on_font:|....& . |
|00002170| 4d 55 24 3d 22 62 6f 72 | 64 65 72 73 22 20 f2 6f |MU$="bor|ders" .o|
|00002180| 70 74 69 6f 6e 5f 62 6f | 72 64 65 72 73 3a e1 0d |ption_bo|rders:..|
|00002190| 0b 04 20 20 e7 20 63 68 | 6f 69 63 65 25 3d 31 20 |.. . ch|oice%=1 |
|000021a0| f2 76 65 72 69 66 79 73 | 68 75 74 64 6f 77 6e 0d |.verifys|hutdown.|
|000021b0| 0b 0e 06 20 e1 0d 0b 18 | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|000021c0| 2d 2d 2d 2d 2d 0d 0b 22 | 0f 20 dd f2 73 63 72 61 |-----.."|. ..scra|
|000021d0| 70 5f 65 6d 0d 0b 40 13 | 20 e7 20 73 61 76 65 64 |p_em..@.| . saved|
|000021e0| 5f 6f 6b 3d a3 20 8c 0d | 0b 4a 35 20 20 f2 72 6d |_ok=. ..|.J5 .rm|
|000021f0| 28 22 42 55 54 36 22 29 | 3a 62 75 74 31 24 3d 74 |("BUT6")|:but1$=t|
|00002200| 65 78 74 24 3a f2 72 6d | 28 22 42 55 54 34 22 29 |ext$:.rm|("BUT4")|
|00002210| 3a 62 75 74 32 24 3d 74 | 65 78 74 24 0d 0b 54 36 |:but2$=t|ext$..T6|
|00002220| 20 20 f2 72 6d 28 22 41 | 4c 54 31 22 29 3a f2 61 | .rm("A|LT1"):.a|
|00002230| 6c 65 72 74 28 74 65 78 | 74 24 2c 62 75 74 31 24 |lert(tex|t$,but1$|
|00002240| 2c 62 75 74 32 24 29 3a | f2 6d 69 6e 69 5f 70 6f |,but2$):|.mini_po|
|00002250| 6c 6c 0d 0b 5e 12 20 20 | e7 20 61 6c 65 72 74 3d |ll..^. |. alert=|
|00002260| 30 20 3a e1 0d 0b 68 06 | 20 cd 0d 0b 72 31 20 f2 |0 :...h.| ...r1 .|
|00002270| 69 73 65 74 28 39 2c 22 | 22 2c 77 68 61 6e 64 6c |iset(9,"|",whandl|
|00002280| 65 31 25 29 3a f2 69 73 | 65 74 28 33 2c 22 31 22 |e1%):.is|et(3,"1"|
|00002290| 2c 77 68 61 6e 64 6c 65 | 31 25 29 0d 0b 73 3c 20 |,whandle|1%)..s< |
|000022a0| f2 69 73 65 74 28 34 2c | 22 31 39 39 30 22 2c 77 |.iset(4,|"1990",w|
|000022b0| 68 61 6e 64 6c 65 31 25 | 29 3a f2 69 73 65 74 28 |handle1%|):.iset(|
|000022c0| 31 31 2c 22 4a 61 6e 75 | 61 72 79 22 2c 77 68 61 |11,"Janu|ary",wha|
|000022d0| 6e 64 6c 65 31 25 29 0d | 0b 75 3e 20 4d 4f 4e 54 |ndle1%).|.u> MONT|
|000022e0| 48 24 3d 22 4a 61 6e 75 | 61 72 79 22 3a f2 6d 69 |H$="Janu|ary":.mi|
|000022f0| 6e 69 5f 70 6f 6c 6c 3a | 62 69 72 74 68 64 61 79 |ni_poll:|birthday|
|00002300| 24 28 31 29 3d 22 22 3a | 65 76 65 6e 74 73 24 28 |$(1)="":|events$(|
|00002310| 31 29 3d 22 22 0d 0b 7a | 35 20 68 6f 72 6f 24 3d |1)=""..z|5 horo$=|
|00002320| 22 22 3a 66 69 6c 6d 73 | 24 28 31 29 3d 22 22 3a |"":films|$(1)="":|
|00002330| 73 6f 6e 67 73 24 28 31 | 29 3d 22 22 3a 73 70 6f |songs$(1|)="":spo|
|00002340| 72 74 73 24 28 31 29 3d | 22 22 0d 0b 86 44 20 69 |rts$(1)=|""...D i|
|00002350| 6d 5f 74 79 70 65 24 3d | 22 62 6f 72 64 65 72 22 |m_type$=|"border"|
|00002360| 3a 44 4e 24 3d 28 70 61 | 74 68 24 2b 22 2e 62 61 |:DN$=(pa|th$+".ba|
|00002370| 6e 6e 65 72 31 22 29 3a | f2 69 6d 70 6f 72 74 5f |nner1"):|.import_|
|00002380| 66 69 6c 65 3a f2 73 74 | 79 6c 65 28 31 29 0d 0b |file:.st|yle(1)..|
|00002390| 90 3a 20 24 6e 61 6d 65 | 25 3d 22 42 69 72 74 68 |.: $name|%="Birth|
|000023a0| 64 61 79 20 3c 75 6e 74 | 69 74 6c 65 64 3e 22 3a |day <unt|itled>":|
|000023b0| 73 61 76 65 64 5f 6f 6b | 3d b9 3a f2 75 70 64 61 |saved_ok|=.:.upda|
|000023c0| 74 65 5f 74 69 74 6c 65 | 0d 0b 9a 39 20 f2 69 73 |te_title|...9 .is|
|000023d0| 65 74 28 33 38 2c 22 64 | 65 66 61 75 6c 74 22 2c |et(38,"d|efault",|
|000023e0| 77 68 61 6e 64 6c 65 31 | 25 29 3a 62 6f 72 64 65 |whandle1|%):borde|
|000023f0| 72 5f 6e 61 6d 65 24 3d | 22 64 65 66 61 75 6c 74 |r_name$=|"default|
|00002400| 22 0d 0b a4 3f 20 c8 99 | 22 57 69 6d 70 5f 46 6f |"...? ..|"Wimp_Fo|
|00002410| 72 63 65 52 65 64 72 61 | 77 22 2c 77 68 61 6e 64 |rceRedra|w",whand|
|00002420| 6c 65 31 25 2c 35 35 32 | 2c 2d 36 39 32 2c 39 39 |le1%,552|,-692,99|
|00002430| 30 2c 2d 37 32 3a 73 61 | 76 65 64 5f 6f 6b 3d b9 |0,-72:sa|ved_ok=.|
|00002440| 0d 0b ae 18 20 f2 63 61 | 72 65 74 28 39 2c 77 68 |.... .ca|ret(9,wh|
|00002450| 61 6e 64 6c 65 31 25 29 | 0d 0b b8 06 20 e1 0d 0b |andle1%)|.... ...|
|00002460| c1 06 20 e1 0d 0b c2 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00002470| 2d 2d 2d 2d 0d 0b c3 16 | 20 dd f2 6f 70 74 69 6f |----....| ..optio|
|00002480| 6e 5f 6d 61 69 6e 6d 65 | 6e 75 0d 0b c4 12 20 e7 |n_mainme|nu.... .|
|00002490| 20 63 68 6f 69 63 65 25 | 3d 30 20 8c 0d 0b c5 14 | choice%|=0 .....|
|000024a0| 20 20 e7 20 63 68 6f 69 | 63 65 32 25 3d 32 20 8c | . choi|ce2%=2 .|
|000024b0| 0d 0b d6 33 20 20 20 f2 | 6f 70 65 6e 77 69 6e 64 |...3 .|openwind|
|000024c0| 6f 77 28 70 72 69 6e 74 | 5f 77 69 6e 25 29 3a f2 |ow(print|_win%):.|
|000024d0| 63 61 72 65 74 28 33 2c | 70 72 69 6e 74 5f 77 69 |caret(3,|print_wi|
|000024e0| 6e 25 29 0d 0b e0 31 20 | 20 20 f2 70 64 72 69 76 |n%)...1 | .pdriv|
|000024f0| 65 72 3a e7 20 74 79 70 | 24 3c 3e 22 6e 6f 74 20 |er:. typ|$<>"not |
|00002500| 6c 6f 61 64 65 64 22 20 | 24 70 6e 61 6d 65 25 3d |loaded" |$pname%=|
|00002510| 74 79 70 24 0d 0b ea 08 | 20 20 20 e1 0d 0b f4 07 |typ$....| .....|
|00002520| 20 20 cd 0d 0b fe 06 20 | cd 0d 0c 08 04 0d 0c 12 | ..... |........|
|00002530| 20 20 e7 20 63 68 6f 69 | 63 65 25 3d 31 20 f2 73 | . choi|ce%=1 .s|
|00002540| 65 74 5f 76 69 65 77 5f | 6c 69 6d 3a e1 0d 0c 1c |et_view_|lim:....|
|00002550| 04 0d 0c 26 12 20 e7 20 | 63 68 6f 69 63 65 25 3d |...&. . |choice%=|
|00002560| 32 20 8c 0d 0c 30 3f 20 | 20 e7 20 63 68 6f 69 63 |2 ...0? | . choic|
|00002570| 65 32 25 3d 30 20 f2 6f | 70 65 6e 77 69 6e 64 6f |e2%=0 .o|penwindo|
|00002580| 77 28 73 63 61 6c 65 5f | 77 69 6e 25 29 3a f2 63 |w(scale_|win%):.c|
|00002590| 61 72 65 74 28 33 2c 73 | 63 61 6c 65 5f 77 69 6e |aret(3,s|cale_win|
|000025a0| 25 29 0d 0c 31 22 20 20 | e7 20 63 68 6f 69 63 65 |%)..1" |. choice|
|000025b0| 32 25 3d 31 20 f2 73 61 | 76 65 64 65 66 61 75 6c |2%=1 .sa|vedefaul|
|000025c0| 74 73 3a e1 0d 0c 3a 14 | 20 20 e7 20 63 68 6f 69 |ts:...:.| . choi|
|000025d0| 63 65 32 25 3d 32 20 8c | 0d 0c 44 36 20 20 20 62 |ce2%=2 .|..D6 b|
|000025e0| 6c 6f 63 6b 25 21 30 3d | 76 69 65 77 5f 77 69 6e |lock%!0=|view_win|
|000025f0| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|00002600| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 0c |indow",,|block%..|
|00002610| 4e 37 20 20 20 62 6c 6f | 63 6b 25 21 30 3d 73 63 |N7 blo|ck%!0=sc|
|00002620| 61 6c 65 5f 77 69 6e 25 | 3a c8 99 22 57 69 6d 70 |ale_win%|:.."Wimp|
|00002630| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00002640| 6c 6f 63 6b 25 0d 0c 58 | 28 20 20 20 f2 72 65 61 |lock%..X|( .rea|
|00002650| 64 66 6f 6e 74 73 3a f2 | 6f 70 65 6e 77 69 6e 64 |dfonts:.|openwind|
|00002660| 6f 77 28 66 6f 6e 74 5f | 77 69 6e 25 29 0d 0c 62 |ow(font_|win%)..b|
|00002670| 44 20 20 20 f2 69 73 65 | 74 28 35 2c 66 6f 6e 74 |D .ise|t(5,font|
|00002680| 73 24 28 65 66 31 29 2c | 66 6f 6e 74 5f 77 69 6e |s$(ef1),|font_win|
|00002690| 25 29 3a f2 69 73 65 74 | 28 36 2c 66 6f 6e 74 73 |%):.iset|(6,fonts|
|000026a0| 24 28 65 66 32 29 2c 66 | 6f 6e 74 5f 77 69 6e 25 |$(ef2),f|ont_win%|
|000026b0| 29 0d 0c 6c 46 20 20 20 | f2 69 73 65 74 28 37 2c |)..lF |.iset(7,|
|000026c0| 66 6f 6e 74 73 24 28 65 | 66 33 29 2c 66 6f 6e 74 |fonts$(e|f3),font|
|000026d0| 5f 77 69 6e 25 29 3a 6f | 6c 64 65 66 31 3d 65 66 |_win%):o|ldef1=ef|
|000026e0| 31 3a 6f 6c 64 65 66 32 | 3d 65 66 32 3a 6f 6c 64 |1:oldef2|=ef2:old|
|000026f0| 65 66 33 3d 65 66 33 0d | 0c 76 54 20 20 20 6f 6c |ef3=ef3.|.vT ol|
|00002700| 64 65 66 31 63 3d 65 66 | 31 63 3a 6f 6c 64 65 66 |def1c=ef|1c:oldef|
|00002710| 32 63 3d 65 66 32 63 3a | 6f 6c 64 65 66 33 63 3d |2c=ef2c:|oldef3c=|
|00002720| 65 66 33 63 3a c8 99 22 | 57 69 6d 70 5f 53 65 74 |ef3c:.."|Wimp_Set|
|00002730| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 66 |CaretPos|ition",f|
|00002740| 6f 6e 74 5f 77 69 6e 25 | 2c 2d 31 0d 0c 80 08 20 |ont_win%|,-1.... |
|00002750| 20 20 e1 0d 0c 8a 07 20 | 20 cd 0d 0c 94 14 20 20 | ..... | ..... |
|00002760| e7 20 63 68 6f 69 63 65 | 32 25 3d 33 20 8c 0d 0c |. choice|2%=3 ...|
|00002770| 9e 1b 20 20 20 f2 6d 69 | 6e 69 5f 70 6f 6c 6c 3a |.. .mi|ni_poll:|
|00002780| f2 63 61 6c 63 5f 64 61 | 79 0d 0c a8 48 20 20 20 |.calc_da|y...H |
|00002790| f2 69 72 65 61 64 28 39 | 2c 77 68 61 6e 64 6c 65 |.iread(9|,whandle|
|000027a0| 31 25 29 3a e7 20 61 24 | 3d 22 22 20 f2 72 6d 28 |1%):. a$|="" .rm(|
|000027b0| 22 45 52 52 32 22 29 3a | f2 65 72 72 62 6f 78 28 |"ERR2"):|.errbox(|
|000027c0| 74 65 78 74 24 29 3a f2 | 6d 69 6e 69 5f 70 6f 6c |text$):.|mini_pol|
|000027d0| 6c 0d 0c b2 17 20 20 20 | e7 20 63 61 6c 63 5f 61 |l.... |. calc_a|
|000027e0| 62 6f 72 74 3d a3 20 8c | 0d 0c bc 3d 20 20 20 20 |bort=. .|...= |
|000027f0| f2 63 6c 69 63 6b 5f 62 | 69 72 74 68 3a f2 63 6c |.click_b|irth:.cl|
|00002800| 69 63 6b 5f 65 76 65 6e | 74 73 3a f2 63 6c 69 63 |ick_even|ts:.clic|
|00002810| 6b 5f 66 69 6c 6d 73 3a | f2 63 6c 69 63 6b 5f 73 |k_films:|.click_s|
|00002820| 63 6f 70 65 73 0d 0c c6 | 2b 20 20 20 20 f2 72 65 |copes...|+ .re|
|00002830| 61 64 5f 73 70 6f 72 74 | 73 3a f2 63 6c 69 63 6b |ad_sport|s:.click|
|00002840| 5f 73 6f 6e 67 73 3a f2 | 73 74 79 6c 65 28 31 29 |_songs:.|style(1)|
|00002850| 0d 0c d0 37 20 20 20 20 | 62 6c 6f 63 6b 25 21 30 |...7 |block%!0|
|00002860| 3d 76 69 65 77 5f 77 69 | 6e 25 3a c8 99 22 57 69 |=view_wi|n%:.."Wi|
|00002870| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00002880| 2c 62 6c 6f 63 6b 25 0d | 0c da 42 20 20 20 20 c8 |,block%.|..B .|
|00002890| 99 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 |."Wimp_F|orceRedr|
|000028a0| 61 77 22 2c 77 68 61 6e | 64 6c 65 31 25 2c 35 35 |aw",whan|dle1%,55|
|000028b0| 32 2c 2d 36 39 32 2c 39 | 39 30 2c 2d 37 32 3a 73 |2,-692,9|90,-72:s|
|000028c0| 61 76 65 64 5f 6f 6b 3d | a3 0d 0c e4 08 20 20 20 |aved_ok=|..... |
|000028d0| cd 0d 0c ee 07 20 20 cd | 0d 0c f8 06 20 cd 0d 0d |..... .|.... ...|
|000028e0| 02 06 20 e1 0d 0d 0c 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|000028f0| 2d 2d 2d 2d 0d 0d 16 17 | 20 dd f2 6f 70 74 69 6f |----....| ..optio|
|00002900| 6e 5f 6d 6f 6e 74 68 6d | 65 6e 75 0d 0d 20 15 20 |n_monthm|enu.. . |
|00002910| 4d 4f 4e 54 48 25 3d 31 | 2b 63 68 6f 69 63 65 25 |MONTH%=1|+choice%|
|00002920| 0d 0d 2a 11 20 e7 20 4d | 4f 4e 54 48 25 3d 31 20 |..*. . M|ONTH%=1 |
|00002930| 8c 0d 0d 34 23 20 20 f2 | 69 73 65 74 28 31 31 2c |...4# .|iset(11,|
|00002940| 22 4a 61 6e 75 61 72 79 | 22 2c 77 68 61 6e 64 6c |"January|",whandl|
|00002950| 65 31 25 29 0d 0d 3e 31 | 20 20 62 69 72 74 68 73 |e1%)..>1| births|
|00002960| 74 6f 6e 65 24 3d 22 47 | 61 72 6e 65 74 22 3a 62 |tone$="G|arnet":b|
|00002970| 69 72 74 68 70 6c 61 6e | 74 24 3d 22 53 6e 6f 77 |irthplan|t$="Snow|
|00002980| 64 72 6f 70 22 0d 0d 48 | 06 20 cd 0d 0d 52 11 20 |drop"..H|. ...R. |
|00002990| e7 20 4d 4f 4e 54 48 25 | 3d 32 20 8c 0d 0d 5c 24 |. MONTH%|=2 ...\$|
|000029a0| 20 20 f2 69 73 65 74 28 | 31 31 2c 22 46 65 62 72 | .iset(|11,"Febr|
|000029b0| 75 61 72 79 22 2c 77 68 | 61 6e 64 6c 65 31 25 29 |uary",wh|andle1%)|
|000029c0| 0d 0d 66 31 20 20 62 69 | 72 74 68 73 74 6f 6e 65 |..f1 bi|rthstone|
|000029d0| 24 3d 22 41 6d 65 74 68 | 79 73 74 22 3a 62 69 72 |$="Ameth|yst":bir|
|000029e0| 74 68 70 6c 61 6e 74 24 | 3d 22 56 69 6f 6c 65 74 |thplant$|="Violet|
|000029f0| 22 0d 0d 70 06 20 cd 0d | 0d 7a 11 20 e7 20 4d 4f |"..p. ..|.z. . MO|
|00002a00| 4e 54 48 25 3d 33 20 8c | 0d 0d 84 21 20 20 f2 69 |NTH%=3 .|...! .i|
|00002a10| 73 65 74 28 31 31 2c 22 | 4d 61 72 63 68 22 2c 77 |set(11,"|March",w|
|00002a20| 68 61 6e 64 6c 65 31 25 | 29 0d 0d 8e 35 20 20 62 |handle1%|)...5 b|
|00002a30| 69 72 74 68 73 74 6f 6e | 65 24 3d 22 41 71 75 61 |irthston|e$="Aqua|
|00002a40| 6d 61 72 69 6e 65 22 3a | 62 69 72 74 68 70 6c 61 |marine":|birthpla|
|00002a50| 6e 74 24 3d 22 44 61 66 | 66 6f 64 69 6c 22 0d 0d |nt$="Daf|fodil"..|
|00002a60| 98 06 20 cd 0d 0d a2 11 | 20 e7 20 4d 4f 4e 54 48 |.. .....| . MONTH|
|00002a70| 25 3d 34 20 8c 0d 0d ac | 21 20 20 f2 69 73 65 74 |%=4 ....|! .iset|
|00002a80| 28 31 31 2c 22 41 70 72 | 69 6c 22 2c 77 68 61 6e |(11,"Apr|il",whan|
|00002a90| 64 6c 65 31 25 29 0d 0d | b6 33 20 20 62 69 72 74 |dle1%)..|.3 birt|
|00002aa0| 68 73 74 6f 6e 65 24 3d | 22 44 69 61 6d 6f 6e 64 |hstone$=|"Diamond|
|00002ab0| 22 3a 62 69 72 74 68 70 | 6c 61 6e 74 24 3d 22 53 |":birthp|lant$="S|
|00002ac0| 77 65 65 74 20 50 65 61 | 22 0d 0d c0 06 20 cd 0d |weet Pea|".... ..|
|00002ad0| 0d ca 11 20 e7 20 4d 4f | 4e 54 48 25 3d 35 20 8c |... . MO|NTH%=5 .|
|00002ae0| 0d 0d d4 1f 20 20 f2 69 | 73 65 74 28 31 31 2c 22 |.... .i|set(11,"|
|00002af0| 4d 61 79 22 2c 77 68 61 | 6e 64 6c 65 31 25 29 0d |May",wha|ndle1%).|
|00002b00| 0d de 3c 20 20 62 69 72 | 74 68 73 74 6f 6e 65 24 |..< bir|thstone$|
|00002b10| 3d 22 45 6d 65 72 61 6c | 64 22 3a 62 69 72 74 68 |="Emeral|d":birth|
|00002b20| 70 6c 61 6e 74 24 3d 22 | 4c 69 6c 79 20 6f 66 20 |plant$="|Lily of |
|00002b30| 74 68 65 20 56 61 6c 6c | 65 79 22 0d 0d e8 06 20 |the Vall|ey".... |
|00002b40| cd 0d 0d f2 11 20 e7 20 | 4d 4f 4e 54 48 25 3d 36 |..... . |MONTH%=6|
|00002b50| 20 8c 0d 0d fc 20 20 20 | f2 69 73 65 74 28 31 31 | .... |.iset(11|
|00002b60| 2c 22 4a 75 6e 65 22 2c | 77 68 61 6e 64 6c 65 31 |,"June",|whandle1|
|00002b70| 25 29 0d 0e 06 2c 20 20 | 62 69 72 74 68 73 74 6f |%)..., |birthsto|
|00002b80| 6e 65 24 3d 22 50 65 61 | 72 6c 22 3a 62 69 72 74 |ne$="Pea|rl":birt|
|00002b90| 68 70 6c 61 6e 74 24 3d | 22 52 6f 73 65 22 0d 0e |hplant$=|"Rose"..|
|00002ba0| 10 06 20 cd 0d 0e 1a 11 | 20 e7 20 4d 4f 4e 54 48 |.. .....| . MONTH|
|00002bb0| 25 3d 37 20 8c 0d 0e 24 | 20 20 20 f2 69 73 65 74 |%=7 ...$| .iset|
|00002bc0| 28 31 31 2c 22 4a 75 6c | 79 22 2c 77 68 61 6e 64 |(11,"Jul|y",whand|
|00002bd0| 6c 65 31 25 29 0d 0e 2e | 2f 20 20 62 69 72 74 68 |le1%)...|/ birth|
|00002be0| 73 74 6f 6e 65 24 3d 22 | 52 75 62 79 22 3a 62 69 |stone$="|Ruby":bi|
|00002bf0| 72 74 68 70 6c 61 6e 74 | 24 3d 22 4c 61 72 6b 73 |rthplant|$="Larks|
|00002c00| 70 75 72 22 0d 0e 38 06 | 20 cd 0d 0e 42 11 20 e7 |pur"..8.| ...B. .|
|00002c10| 20 4d 4f 4e 54 48 25 3d | 38 20 8c 0d 0e 4c 22 20 | MONTH%=|8 ...L" |
|00002c20| 20 f2 69 73 65 74 28 31 | 31 2c 22 41 75 67 75 73 | .iset(1|1,"Augus|
|00002c30| 74 22 2c 77 68 61 6e 64 | 6c 65 31 25 29 0d 0e 56 |t",whand|le1%)..V|
|00002c40| 2f 20 20 62 69 72 74 68 | 73 74 6f 6e 65 24 3d 22 |/ birth|stone$="|
|00002c50| 50 65 72 69 64 6f 74 22 | 3a 62 69 72 74 68 70 6c |Peridot"|:birthpl|
|00002c60| 61 6e 74 24 3d 22 50 6f | 70 70 79 22 0d 0e 60 06 |ant$="Po|ppy"..`.|
|00002c70| 20 cd 0d 0e 6a 11 20 e7 | 20 4d 4f 4e 54 48 25 3d | ...j. .| MONTH%=|
|00002c80| 39 20 8c 0d 0e 74 25 20 | 20 f2 69 73 65 74 28 31 |9 ...t% | .iset(1|
|00002c90| 31 2c 22 53 65 70 74 65 | 6d 62 65 72 22 2c 77 68 |1,"Septe|mber",wh|
|00002ca0| 61 6e 64 6c 65 31 25 29 | 0d 0e 7e 30 20 20 62 69 |andle1%)|..~0 bi|
|00002cb0| 72 74 68 73 74 6f 6e 65 | 24 3d 22 53 61 70 70 68 |rthstone|$="Sapph|
|00002cc0| 69 72 65 22 3a 62 69 72 | 74 68 70 6c 61 6e 74 24 |ire":bir|thplant$|
|00002cd0| 3d 22 41 73 74 65 72 22 | 0d 0e 88 06 20 cd 0d 0e |="Aster"|.... ...|
|00002ce0| 92 12 20 e7 20 4d 4f 4e | 54 48 25 3d 31 30 20 8c |.. . MON|TH%=10 .|
|00002cf0| 0d 0e 9c 23 20 20 f2 69 | 73 65 74 28 31 31 2c 22 |...# .i|set(11,"|
|00002d00| 4f 63 74 6f 62 65 72 22 | 2c 77 68 61 6e 64 6c 65 |October"|,whandle|
|00002d10| 31 25 29 0d 0e a6 30 20 | 20 62 69 72 74 68 73 74 |1%)...0 | birthst|
|00002d20| 6f 6e 65 24 3d 22 4f 70 | 61 6c 22 3a 62 69 72 74 |one$="Op|al":birt|
|00002d30| 68 70 6c 61 6e 74 24 3d | 22 43 61 6c 65 6e 64 75 |hplant$=|"Calendu|
|00002d40| 6c 61 22 0d 0e b0 06 20 | cd 0d 0e ba 12 20 e7 20 |la".... |..... . |
|00002d50| 4d 4f 4e 54 48 25 3d 31 | 31 20 8c 0d 0e c4 24 20 |MONTH%=1|1 ....$ |
|00002d60| 20 f2 69 73 65 74 28 31 | 31 2c 22 4e 6f 76 65 6d | .iset(1|1,"Novem|
|00002d70| 62 65 72 22 2c 77 68 61 | 6e 64 6c 65 31 25 29 0d |ber",wha|ndle1%).|
|00002d80| 0e ce 35 20 20 62 69 72 | 74 68 73 74 6f 6e 65 24 |..5 bir|thstone$|
|00002d90| 3d 22 54 6f 70 61 7a 22 | 3a 62 69 72 74 68 70 6c |="Topaz"|:birthpl|
|00002da0| 61 6e 74 24 3d 22 43 68 | 72 79 73 61 6e 74 68 65 |ant$="Ch|rysanthe|
|00002db0| 6d 75 6d 22 0d 0e d8 06 | 20 cd 0d 0e e2 12 20 e7 |mum"....| ..... .|
|00002dc0| 20 4d 4f 4e 54 48 25 3d | 31 32 20 8c 0d 0e ec 24 | MONTH%=|12 ....$|
|00002dd0| 20 20 f2 69 73 65 74 28 | 31 31 2c 22 44 65 63 65 | .iset(|11,"Dece|
|00002de0| 6d 62 65 72 22 2c 77 68 | 61 6e 64 6c 65 31 25 29 |mber",wh|andle1%)|
|00002df0| 0d 0e f6 31 20 20 62 69 | 72 74 68 73 74 6f 6e 65 |...1 bi|rthstone|
|00002e00| 24 3d 22 54 75 72 71 75 | 6f 69 73 65 22 3a 62 69 |$="Turqu|oise":bi|
|00002e10| 72 74 68 70 6c 61 6e 74 | 24 3d 22 48 6f 6c 6c 79 |rthplant|$="Holly|
|00002e20| 22 0d 0f 00 06 20 cd 0d | 0f 01 37 20 f2 63 61 72 |".... ..|..7 .car|
|00002e30| 65 74 28 33 2c 77 68 61 | 6e 64 6c 65 31 25 29 3a |et(3,wha|ndle1%):|
|00002e40| e7 20 63 72 65 61 74 65 | 5f 6d 65 6e 75 3d 30 20 |. create|_menu=0 |
|00002e50| e1 20 8b 20 f2 6d 6f 6e | 74 68 6d 65 6e 75 0d 0f |. . .mon|thmenu..|
|00002e60| 0a 06 20 e1 0d 0f 14 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00002e70| 2d 2d 2d 2d 0d 0f 1e 0f | 20 dd a4 54 65 6d 70 28 |----....| ..Temp(|
|00002e80| 54 24 29 0d 0f 28 24 20 | 24 77 69 6e 5f 69 64 65 |T$)..($ |$win_ide|
|00002e90| 6e 25 3d 54 24 3a ea 20 | 68 25 3a 77 64 61 25 3d |n%=T$:. |h%:wda%=|
|00002ea0| 77 64 61 74 61 31 25 0d | 0f 32 4b 20 c8 99 22 57 |wdata1%.|.2K .."W|
|00002eb0| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00002ec0| 22 2c 2c 62 6c 6f 63 6b | 25 2c 77 64 61 74 61 31 |",,block|%,wdata1|
|00002ed0| 25 2c 77 64 31 65 6e 64 | 25 2c 2d 31 2c 77 69 6e |%,wd1end|%,-1,win|
|00002ee0| 5f 69 64 65 6e 25 20 b8 | 20 2c 2c 77 64 61 74 61 |_iden% .| ,,wdata|
|00002ef0| 31 25 0d 0f 3c 18 20 62 | 6c 6f 63 6b 25 21 36 34 |1%..<. b|lock%!64|
|00002f00| 3d 69 63 6f 6e 73 70 61 | 63 65 0d 0f 46 40 20 e7 |=iconspa|ce..F@ .|
|00002f10| 20 54 24 3d 22 4d 61 69 | 6e 22 20 6e 61 6d 65 25 | T$="Mai|n" name%|
|00002f20| 3d 62 6c 6f 63 6b 25 21 | 37 32 3a f2 73 65 74 5f |=block%!|72:.set_|
|00002f30| 6d 61 69 6e 5f 69 63 6f | 6e 73 3a 62 6c 6f 63 6b |main_ico|ns:block|
|00002f40| 25 21 31 32 3d 74 6f 70 | 5f 79 0d 0f 50 22 20 e7 |%!12=top|_y..P" .|
|00002f50| 20 54 24 3d 22 56 69 65 | 77 22 20 76 69 65 77 65 | T$="Vie|w" viewe|
|00002f60| 72 25 3d 62 6c 6f 63 6b | 25 21 37 32 0d 0f 5a b8 |r%=block|%!72..Z.|
|00002f70| 20 e7 20 54 24 3d 22 70 | 72 69 6e 74 22 20 70 6e | . T$="p|rint" pn|
|00002f80| 61 6d 65 25 3d 62 6c 6f | 63 6b 25 21 37 32 3a 62 |ame%=blo|ck%!72:b|
|00002f90| 6c 6f 63 6b 25 21 28 38 | 38 2b 30 2a 33 32 2b 32 |lock%!(8|8+0*32+2|
|00002fa0| 34 29 3d 69 63 6f 6e 73 | 70 61 63 65 3a 62 6c 6f |4)=icons|pace:blo|
|00002fb0| 63 6b 25 21 28 38 38 2b | 31 2a 33 32 2b 32 34 29 |ck%!(88+|1*32+24)|
|00002fc0| 3d 69 63 6f 6e 73 70 61 | 63 65 3a 62 6c 6f 63 6b |=iconspa|ce:block|
|00002fd0| 25 21 28 38 38 2b 34 2a | 33 32 2b 32 34 29 3d 69 |%!(88+4*|32+24)=i|
|00002fe0| 63 6f 6e 73 70 61 63 65 | 3a 62 6c 6f 63 6b 25 21 |conspace|:block%!|
|00002ff0| 28 38 38 2b 35 2a 33 32 | 2b 32 34 29 3d 69 63 6f |(88+5*32|+24)=ico|
|00003000| 6e 73 70 61 63 65 3a 62 | 6c 6f 63 6b 25 21 28 38 |nspace:b|lock%!(8|
|00003010| 38 2b 39 2a 33 32 2b 32 | 34 29 3d 69 63 6f 6e 73 |8+9*32+2|4)=icons|
|00003020| 70 61 63 65 0d 0f 64 4d | 20 e7 20 54 24 3d 22 73 |pace..dM| . T$="s|
|00003030| 63 61 6c 65 22 20 62 6c | 6f 63 6b 25 21 28 38 38 |cale" bl|ock%!(88|
|00003040| 2b 30 2a 33 32 2b 32 34 | 29 3d 69 63 6f 6e 73 70 |+0*32+24|)=iconsp|
|00003050| 61 63 65 3a 62 6c 6f 63 | 6b 25 21 28 38 38 2b 31 |ace:bloc|k%!(88+1|
|00003060| 2a 33 32 2b 32 34 29 3d | 69 63 6f 6e 73 70 61 63 |*32+24)=|iconspac|
|00003070| 65 0d 0f 6e 20 20 e7 20 | 54 24 3d 22 66 6f 6e 74 |e..n . |T$="font|
|00003080| 22 20 f2 73 65 74 5f 66 | 6f 6e 74 5f 69 63 6f 6e |" .set_f|ont_icon|
|00003090| 73 0d 0f 78 30 20 e7 20 | 54 24 3d 22 65 72 72 62 |s..x0 . |T$="errb|
|000030a0| 6f 78 22 20 62 6c 6f 63 | 6b 25 21 28 38 38 2b 34 |ox" bloc|k%!(88+4|
|000030b0| 2a 33 32 2b 32 34 29 3d | 69 63 6f 6e 73 70 61 63 |*32+24)=|iconspac|
|000030c0| 65 0d 0f 7a 2d 20 e7 20 | 54 24 3d 22 72 65 67 22 |e..z- . |T$="reg"|
|000030d0| 20 62 6c 6f 63 6b 25 21 | 28 38 38 2b 34 2a 33 32 | block%!|(88+4*32|
|000030e0| 2b 32 34 29 3d 69 63 6f | 6e 73 70 61 63 65 0d 0f |+24)=ico|nspace..|
|000030f0| 82 4f 20 e7 20 54 24 3d | 22 77 61 72 6e 69 6e 67 |.O . T$=|"warning|
|00003100| 22 20 62 6c 6f 63 6b 25 | 21 28 38 38 2b 34 2a 33 |" block%|!(88+4*3|
|00003110| 32 2b 32 34 29 3d 69 63 | 6f 6e 73 70 61 63 65 3a |2+24)=ic|onspace:|
|00003120| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 35 2a 33 32 2b |block%!(|88+5*32+|
|00003130| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 0d 0f 8c |24)=icon|space...|
|00003140| 2e 20 e7 20 54 24 3d 22 | 73 61 76 65 22 20 62 6c |. . T$="|save" bl|
|00003150| 6f 63 6b 25 21 28 38 38 | 2b 32 2a 33 32 2b 32 34 |ock%!(88|+2*32+24|
|00003160| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 0f 96 2f 20 |)=iconsp|ace.../ |
|00003170| e7 20 54 24 3d 22 73 61 | 76 65 32 22 20 62 6c 6f |. T$="sa|ve2" blo|
|00003180| 63 6b 25 21 28 38 38 2b | 32 2a 33 32 2b 32 34 29 |ck%!(88+|2*32+24)|
|00003190| 3d 69 63 6f 6e 73 70 61 | 63 65 0d 0f a0 27 20 c8 |=iconspa|ce...' .|
|000031a0| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e |."Wimp_C|reateWin|
|000031b0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 20 b8 20 68 |dow",,bl|ock% . h|
|000031c0| 25 0d 0f aa 08 20 3d 68 | 25 0d 0f b4 10 20 f4 2d |%.... =h|%.... .-|
|000031d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0f be 15 20 dd f2 |--------|-.... ..|
|000031e0| 73 65 74 5f 6d 61 69 6e | 5f 69 63 6f 6e 73 0d 0f |set_main|_icons..|
|000031f0| c8 14 20 f7 20 8d 64 66 | 4f 3a f5 3a f3 20 69 63 |.. . .df|O:.:. ic|
|00003200| 5f 6e 0d 0f d2 30 20 e7 | 20 69 63 5f 6e 3c 3e 2d |_n...0 .| ic_n<>-|
|00003210| 31 20 62 6c 6f 63 6b 25 | 21 28 38 38 2b 69 63 5f |1 block%|!(88+ic_|
|00003220| 6e 2a 33 32 2b 32 34 29 | 3d 69 63 6f 6e 73 70 61 |n*32+24)|=iconspa|
|00003230| 63 65 0d 0f dc 10 20 fd | 20 69 63 5f 6e 3d 2d 31 |ce.... .| ic_n=-1|
|00003240| 3a e1 0d 0f e6 30 20 dc | 20 33 30 2c 33 31 2c 33 |:....0 .| 30,31,3|
|00003250| 32 2c 33 33 2c 31 32 2c | 32 32 2c 32 39 2c 31 34 |2,33,12,|22,29,14|
|00003260| 2c 31 35 2c 34 30 2c 32 | 38 2c 33 35 2c 33 36 2c |,15,40,2|8,35,36,|
|00003270| 2d 31 0d 0f f0 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d |-1.... .|--------|
|00003280| 2d 2d 0d 0f fa 15 20 dd | f2 73 65 74 5f 66 6f 6e |--.... .|.set_fon|
|00003290| 74 5f 69 63 6f 6e 73 0d | 10 04 14 20 f7 20 8d 54 |t_icons.|... . .T|
|000032a0| 62 50 3a f5 3a f3 20 69 | 63 5f 6e 0d 10 0e 30 20 |bP:.:. i|c_n...0 |
|000032b0| e7 20 69 63 5f 6e 3c 3e | 2d 31 20 62 6c 6f 63 6b |. ic_n<>|-1 block|
|000032c0| 25 21 28 38 38 2b 69 63 | 5f 6e 2a 33 32 2b 32 34 |%!(88+ic|_n*32+24|
|000032d0| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 10 18 10 20 |)=iconsp|ace.... |
|000032e0| fd 20 69 63 5f 6e 3d 2d | 31 3a e1 0d 10 22 1c 20 |. ic_n=-|1:...". |
|000032f0| dc 20 38 2c 39 2c 31 30 | 2c 31 31 2c 31 32 2c 31 |. 8,9,10|,11,12,1|
|00003300| 33 2c 31 34 2c 2d 31 0d | 10 2c 10 20 f4 2d 2d 2d |3,14,-1.|.,. .---|
|00003310| 2d 2d 2d 2d 2d 2d 2d 0d | 10 36 0c 20 dd f2 65 72 |-------.|.6. ..er|
|00003320| 72 6f 72 0d 10 40 0e 20 | 21 62 6c 6f 63 6b 25 3d |ror..@. |!block%=|
|00003330| 9f 0d 10 4a 36 20 24 28 | 62 6c 6f 63 6b 25 2b 34 |...J6 $(|block%+4|
|00003340| 29 3d f6 24 2b 22 20 28 | 69 6e 74 65 72 6e 61 6c |)=.$+" (|internal|
|00003350| 20 65 72 72 6f 72 20 63 | 6f 64 65 20 22 2b c3 9e | error c|ode "+..|
|00003360| 2b 22 29 22 2b bd 30 0d | 10 54 34 20 f2 72 6d 28 |+")"+.0.|.T4 .rm(|
|00003370| 22 45 52 4d 31 22 29 3a | c8 99 22 57 69 6d 70 5f |"ERM1"):|.."Wimp_|
|00003380| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 2c 62 6c 6f |ReportEr|ror",blo|
|00003390| 63 6b 25 2c 31 2c 74 65 | 78 74 24 0d 10 5e 06 20 |ck%,1,te|xt$..^. |
|000033a0| e1 0d 10 68 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...h. .-|--------|
|000033b0| 2d 0d 10 72 10 20 dd a4 | 77 69 6d 70 65 72 72 6f |-..r. ..|wimperro|
|000033c0| 72 0d 10 7c 0e 20 21 62 | 6c 6f 63 6b 25 3d 9f 0d |r..|. !b|lock%=..|
|000033d0| 10 86 29 20 24 28 62 6c | 6f 63 6b 25 2b 34 29 3d |..) $(bl|ock%+4)=|
|000033e0| f6 24 2b 22 20 28 22 2b | c3 9f 2b 22 29 22 2b 22 |.$+" ("+|..+")"+"|
|000033f0| 20 22 2b c3 9e 2b bd 30 | 0d 10 90 34 20 f2 72 6d | "+..+.0|...4 .rm|
|00003400| 28 22 45 52 4d 31 22 29 | 3a c8 99 22 57 69 6d 70 |("ERM1")|:.."Wimp|
|00003410| 5f 52 65 70 6f 72 74 45 | 72 72 6f 72 22 2c 62 6c |_ReportE|rror",bl|
|00003420| 6f 63 6b 25 2c 31 2c 74 | 65 78 74 24 0d 10 9a 07 |ock%,1,t|ext$....|
|00003430| 20 3d b9 0d 10 a4 10 20 | f4 2d 2d 2d 2d 2d 2d 2d | =..... |.-------|
|00003440| 2d 2d 2d 0d 10 ae 40 20 | dd a4 69 63 6f 6e 64 65 |---...@ |..iconde|
|00003450| 66 28 77 68 61 6e 64 6c | 65 25 2c 69 78 25 2c 69 |f(whandl|e%,ix%,i|
|00003460| 79 25 2c 69 77 25 2c 69 | 68 25 2c 66 6c 61 67 25 |y%,iw%,i|h%,flag%|
|00003470| 2c 74 65 78 74 24 2c 64 | 31 25 2c 64 32 25 2c 64 |,text$,d|1%,d2%,d|
|00003480| 33 25 29 0d 10 b8 30 20 | 62 6c 6f 63 6b 25 21 30 |3%)...0 |block%!0|
|00003490| 3d 77 68 61 6e 64 6c 65 | 25 3a 62 6c 6f 63 6b 25 |=whandle|%:block%|
|000034a0| 21 34 3d 69 78 25 3a 62 | 6c 6f 63 6b 25 21 38 3d |!4=ix%:b|lock%!8=|
|000034b0| 69 79 25 0d 10 c2 38 20 | 62 6c 6f 63 6b 25 21 31 |iy%...8 |block%!1|
|000034c0| 32 3d 69 78 25 2b 69 77 | 25 3a 62 6c 6f 63 6b 25 |2=ix%+iw|%:block%|
|000034d0| 21 31 36 3d 69 79 25 2b | 69 68 25 3a 62 6c 6f 63 |!16=iy%+|ih%:bloc|
|000034e0| 6b 25 21 32 30 3d 66 6c | 61 67 25 0d 10 d6 0e 20 |k%!20=fl|ag%.... |
|000034f0| e7 20 64 31 25 3d 30 20 | 8c 0d 10 e0 18 20 20 24 |. d1%=0 |..... $|
|00003500| 28 62 6c 6f 63 6b 25 2b | 32 34 29 3d 74 65 78 74 |(block%+|24)=text|
|00003510| 24 0d 10 ea 06 20 cc 0d | 10 f4 21 20 20 62 6c 6f |$.... ..|..! blo|
|00003520| 63 6b 25 21 32 34 3d 64 | 31 25 3a 62 6c 6f 63 6b |ck%!24=d|1%:block|
|00003530| 25 21 32 38 3d 64 32 25 | 0d 10 fe 13 20 20 62 6c |%!28=d2%|.... bl|
|00003540| 6f 63 6b 25 21 33 32 3d | 64 33 25 0d 11 08 06 20 |ock%!32=|d3%.... |
|00003550| cd 0d 11 12 2c 20 c8 99 | 20 22 57 69 6d 70 5f 43 |...., ..| "Wimp_C|
|00003560| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 62 6c 6f 63 |reateIco|n",,bloc|
|00003570| 6b 25 20 b8 20 69 68 61 | 6e 64 6c 65 25 0d 11 1c |k% . iha|ndle%...|
|00003580| 0e 20 3d 69 68 61 6e 64 | 6c 65 25 0d 11 26 10 20 |. =ihand|le%..&. |
|00003590| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 11 30 15 20 |.-------|---..0. |
|000035a0| dd f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 47 25 29 |..openwi|ndow(G%)|
|000035b0| 0d 11 3a 30 20 62 6c 6f | 63 6b 25 21 30 3d 47 25 |..:0 blo|ck%!0=G%|
|000035c0| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |:.."Wimp|_GetWind|
|000035d0| 6f 77 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |owState"|,,block%|
|000035e0| 0d 11 4e 20 20 c8 99 22 | 57 69 6d 70 5f 4f 70 65 |..N .."|Wimp_Ope|
|000035f0| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|00003600| 0d 11 58 06 20 e1 0d 11 | 62 10 20 f4 2d 2d 2d 2d |..X. ...|b. .----|
|00003610| 2d 2d 2d 2d 2d 2d 0d 11 | 6c 2a 20 dd f2 64 72 61 |------..|l* ..dra|
|00003620| 77 6d 65 6e 75 28 6d 25 | 2c 6d 65 6e 75 24 2c 78 |wmenu(m%|,menu$,x|
|00003630| 25 2c 79 25 2c 6f 6e 69 | 63 6f 6e 62 61 72 25 29 |%,y%,oni|conbar%)|
|00003640| 0d 11 76 4a 20 6d 25 3f | 31 32 3d 37 3a 6d 25 3f |..vJ m%?|12=7:m%?|
|00003650| 31 33 3d 32 3a 6d 25 3f | 31 34 3d 37 3a 6d 25 3f |13=2:m%?|14=7:m%?|
|00003660| 31 35 3d 30 3a 6d 25 21 | 31 36 3d 32 30 30 3a 6d |15=0:m%!|16=200:m|
|00003670| 25 21 32 30 3d 34 34 3a | 6d 25 21 32 34 3d 30 3a |%!20=44:|m%!24=0:|
|00003680| 70 74 72 25 3d 6d 25 2b | 32 38 0d 11 80 1e 20 24 |ptr%=m%+|28.... $|
|00003690| 6d 25 3d c0 6d 65 6e 75 | 24 2c a7 6d 65 6e 75 24 |m%=.menu|$,.menu$|
|000036a0| 2c 22 2c 22 29 2d 31 29 | 0d 11 8a 1a 20 6d 65 6e |,",")-1)|.... men|
|000036b0| 75 24 2b 3d 22 2c 22 3a | 65 6e 74 72 69 65 73 25 |u$+=",":|entries%|
|000036c0| 3d 30 0d 11 94 11 20 c8 | 95 20 6d 65 6e 75 24 3c |=0.... .|. menu$<|
|000036d0| 3e 22 22 0d 11 9e 20 20 | 6d 65 6e 75 24 3d c1 6d |>""... |menu$=.m|
|000036e0| 65 6e 75 24 2c a7 6d 65 | 6e 75 24 2c 22 2c 22 29 |enu$,.me|nu$,",")|
|000036f0| 2b 31 29 0d 11 a8 12 20 | e7 20 6d 65 6e 75 24 3c |+1).... |. menu$<|
|00003700| 3e 22 22 20 8c 0d 11 b2 | 27 20 70 74 72 25 21 30 |>"" ....|' ptr%!0|
|00003710| 3d 30 3a 70 74 72 25 21 | 34 3d 2d 31 3a 70 74 72 |=0:ptr%!|4=-1:ptr|
|00003720| 25 21 38 3d 26 37 30 30 | 30 30 32 31 0d 11 bc 3a |%!8=&700|0021...:|
|00003730| 20 24 28 70 74 72 25 2b | 31 32 29 3d c0 6d 65 6e | $(ptr%+|12)=.men|
|00003740| 75 24 2c a7 6d 65 6e 75 | 24 2c 22 2c 22 29 2d 31 |u$,.menu|$,",")-1|
|00003750| 29 3a 70 74 72 25 2b 3d | 32 34 3a 65 6e 74 72 69 |):ptr%+=|24:entri|
|00003760| 65 73 25 2b 3d 31 0d 11 | c6 06 20 cd 0d 11 d0 06 |es%+=1..|.. .....|
|00003770| 20 ce 0d 11 da 1c 20 70 | 74 72 25 21 2d 32 34 3d | ..... p|tr%!-24=|
|00003780| 70 74 72 25 21 2d 32 34 | 20 84 20 26 38 30 0d 11 |ptr%!-24| . &80..|
|00003790| e4 21 20 e7 20 6f 6e 69 | 63 6f 6e 62 61 72 25 20 |.! . oni|conbar% |
|000037a0| 6d 25 21 33 32 3d 77 68 | 61 6e 64 6c 65 32 25 0d |m%!32=wh|andle2%.|
|000037b0| 11 ee 36 20 e7 20 6f 6e | 69 63 6f 6e 62 61 72 25 |..6 . on|iconbar%|
|000037c0| 20 8c 20 79 70 6f 73 25 | 3d 39 36 2b 65 6e 74 72 | . ypos%|=96+entr|
|000037d0| 69 65 73 25 2a 34 34 20 | 8b 20 79 70 6f 73 25 3d |ies%*44 |. ypos%=|
|000037e0| 79 25 2b 32 30 0d 11 f8 | 29 20 c8 99 20 22 57 69 |y%+20...|) .. "Wi|
|000037f0| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00003800| 6d 25 2c 78 25 2d 36 34 | 2c 79 70 6f 73 25 0d 12 |m%,x%-64|,ypos%..|
|00003810| 02 06 20 e1 0d 12 0c 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00003820| 2d 2d 2d 2d 0d 12 16 24 | 20 dd f2 67 65 74 6f 72 |----...$| ..getor|
|00003830| 69 67 69 6e 28 62 6c 6f | 63 6b 25 2c f8 20 78 30 |igin(blo|ck%,. x0|
|00003840| 25 2c f8 20 79 30 25 29 | 0d 12 20 33 20 78 30 25 |%,. y0%)|.. 3 x0%|
|00003850| 3d 62 6c 6f 63 6b 25 21 | 34 2d 62 6c 6f 63 6b 25 |=block%!|4-block%|
|00003860| 21 32 30 3a 79 30 25 3d | 62 6c 6f 63 6b 25 21 31 |!20:y0%=|block%!1|
|00003870| 36 2d 62 6c 6f 63 6b 25 | 21 32 34 0d 12 2a 06 20 |6-block%|!24..*. |
|00003880| e1 0d 12 34 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...4. .-|--------|
|00003890| 2d 0d 12 3e 15 20 dd f2 | 69 73 65 74 28 78 25 2c |-..>. ..|iset(x%,|
|000038a0| 61 24 2c 57 48 29 0d 12 | 48 3d 20 62 6c 6f 63 6b |a$,WH)..|H= block|
|000038b0| 32 25 21 30 3d 57 48 3a | 62 6c 6f 63 6b 32 25 21 |2%!0=WH:|block2%!|
|000038c0| 34 3d 78 25 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |4=x%:.."|Wimp_Get|
|000038d0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|000038e0| 6b 32 25 0d 12 52 15 20 | 24 28 62 6c 6f 63 6b 32 |k2%..R. |$(block2|
|000038f0| 25 21 32 38 29 3d 61 24 | 0d 12 5c 3c 20 62 6c 6f |%!28)=a$|..\< blo|
|00003900| 63 6b 32 25 21 38 3d 30 | 3a 62 6c 6f 63 6b 32 25 |ck2%!8=0|:block2%|
|00003910| 21 31 32 3d 30 3a c8 99 | 22 57 69 6d 70 5f 53 65 |!12=0:..|"Wimp_Se|
|00003920| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00003930| 63 6b 32 25 0d 12 66 06 | 20 e1 0d 12 70 10 20 f4 |ck2%..f.| ...p. .|
|00003940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 12 7a 13 20 dd |--------|--..z. .|
|00003950| f2 69 72 65 61 64 28 78 | 25 2c 57 48 29 0d 12 84 |.iread(x|%,WH)...|
|00003960| 3d 20 62 6c 6f 63 6b 32 | 25 21 30 3d 57 48 3a 62 |= block2|%!0=WH:b|
|00003970| 6c 6f 63 6b 32 25 21 34 | 3d 78 25 3a c8 99 22 57 |lock2%!4|=x%:.."W|
|00003980| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|00003990| 22 2c 2c 62 6c 6f 63 6b | 32 25 0d 12 8e 15 20 61 |",,block|2%.... a|
|000039a0| 24 3d 24 28 62 6c 6f 63 | 6b 32 25 21 32 38 29 0d |$=$(bloc|k2%!28).|
|000039b0| 12 98 06 20 e1 0d 12 a2 | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|000039c0| 2d 2d 2d 2d 2d 0d 12 ac | 13 20 dd f2 6d 61 69 6e |-----...|. ..main|
|000039d0| 6d 65 6e 75 28 6d 25 29 | 0d 12 b6 4a 20 6d 25 3f |menu(m%)|...J m%?|
|000039e0| 31 32 3d 37 3a 6d 25 3f | 31 33 3d 32 3a 6d 25 3f |12=7:m%?|13=2:m%?|
|000039f0| 31 34 3d 37 3a 6d 25 3f | 31 35 3d 30 3a 6d 25 21 |14=7:m%?|15=0:m%!|
|00003a00| 31 36 3d 32 33 34 3a 6d | 25 21 32 30 3d 34 34 3a |16=234:m|%!20=44:|
|00003a10| 6d 25 21 32 34 3d 30 3a | 70 74 72 25 3d 6d 25 2b |m%!24=0:|ptr%=m%+|
|00003a20| 32 38 0d 12 c0 39 20 69 | 6e 64 69 72 25 3d 6d 25 |28...9 i|ndir%=m%|
|00003a30| 2b 32 35 36 3a f2 72 6d | 28 22 4d 55 41 31 22 29 |+256:.rm|("MUA1")|
|00003a40| 3a 6d 6d 6c 3d a7 74 65 | 78 74 24 2c 22 2c 22 29 |:mml=.te|xt$,",")|
|00003a50| 3a 65 6e 74 72 69 65 73 | 25 3d 30 0d 12 ca 31 20 |:entries|%=0...1 |
|00003a60| 24 6d 25 3d c0 74 65 78 | 74 24 2c 6d 6d 6c 2d 31 |$m%=.tex|t$,mml-1|
|00003a70| 29 3a 74 65 78 74 24 3d | c2 74 65 78 74 24 2c a9 |):text$=|.text$,.|
|00003a80| 28 74 65 78 74 24 29 2d | 6d 6d 6c 29 0d 12 d4 06 |(text$)-|mml)....|
|00003a90| 20 f5 0d 12 de 15 20 20 | 6d 6d 6c 3d a7 74 65 78 | ..... |mml=.tex|
|00003aa0| 74 24 2c 22 2c 22 29 0d | 12 e8 19 20 20 6d 65 6e |t$,",").|... men|
|00003ab0| 75 24 3d c0 74 65 78 74 | 24 2c 6d 6d 6c 2d 31 29 |u$=.text|$,mml-1)|
|00003ac0| 0d 12 f2 15 20 20 20 e7 | 20 6d 65 6e 75 24 3c 3e |.... .| menu$<>|
|00003ad0| 22 2a 22 20 8c 0d 12 fc | 22 20 20 20 20 74 65 78 |"*" ....|" tex|
|00003ae0| 74 24 3d c2 74 65 78 74 | 24 2c a9 28 74 65 78 74 |t$=.text|$,.(text|
|00003af0| 24 29 2d 6d 6d 6c 29 0d | 13 06 2a 20 20 20 20 70 |$)-mml).|..* p|
|00003b00| 74 72 25 21 30 3d 30 3a | 70 74 72 25 21 34 3d 2d |tr%!0=0:|ptr%!4=-|
|00003b10| 31 3a 70 74 72 25 21 38 | 3d 26 37 30 30 30 30 32 |1:ptr%!8|=&700002|
|00003b20| 31 0d 13 10 16 20 20 20 | 20 e7 20 a9 6d 65 6e 75 |1.... | . .menu|
|00003b30| 24 3c 3d 31 32 20 8c 0d | 13 1a 2e 20 20 20 20 20 |$<=12 ..|... |
|00003b40| 24 28 70 74 72 25 2b 31 | 32 29 3d 6d 65 6e 75 24 |$(ptr%+1|2)=menu$|
|00003b50| 3a 70 74 72 25 2b 3d 32 | 34 3a 65 6e 74 72 69 65 |:ptr%+=2|4:entrie|
|00003b60| 73 25 2b 3d 31 0d 13 24 | 09 20 20 20 20 cc 0d 13 |s%+=1..$|. ...|
|00003b70| 2e 40 20 20 20 20 20 70 | 74 72 25 21 31 32 3d 69 |.@ p|tr%!12=i|
|00003b80| 6e 64 69 72 25 3a 70 74 | 72 25 21 31 36 3d 30 3a |ndir%:pt|r%!16=0:|
|00003b90| 70 74 72 25 21 32 30 3d | a9 6d 65 6e 75 24 2b 31 |ptr%!20=|.menu$+1|
|00003ba0| 3a 24 69 6e 64 69 72 25 | 3d 6d 65 6e 75 24 0d 13 |:$indir%|=menu$..|
|00003bb0| 38 47 20 20 20 20 20 70 | 74 72 25 21 38 3d 28 70 |8G p|tr%!8=(p|
|00003bc0| 74 72 25 21 38 20 84 20 | 26 31 30 30 29 3a 70 74 |tr%!8 . |&100):pt|
|00003bd0| 72 25 2b 3d 32 34 3a 65 | 6e 74 72 69 65 73 25 2b |r%+=24:e|ntries%+|
|00003be0| 3d 31 3a 69 6e 64 69 72 | 25 2b 3d 28 a9 6d 65 6e |=1:indir|%+=(.men|
|00003bf0| 75 24 2b 31 29 0d 13 42 | 09 20 20 20 20 cd 0d 13 |u$+1)..B|. ...|
|00003c00| 4c 32 20 20 20 e7 20 36 | 34 2b 28 a9 6d 65 6e 75 |L2 . 6|4+(.menu|
|00003c10| 24 2a 31 34 29 3e 6d 25 | 21 31 36 20 6d 25 21 31 |$*14)>m%|!16 m%!1|
|00003c20| 36 3d 36 34 2b 28 a9 6d | 65 6e 75 24 2a 31 34 29 |6=64+(.m|enu$*14)|
|00003c30| 0d 13 56 07 20 20 cd 0d | 13 60 56 20 20 e7 20 70 |..V. ..|.`V . p|
|00003c40| 74 72 25 3e 6d 25 2b 32 | 35 36 20 85 20 31 2c 22 |tr%>m%+2|56 . 1,"|
|00003c50| 4e 4f 20 52 4f 4f 4d 20 | 46 4f 52 20 4d 45 4e 55 |NO ROOM |FOR MENU|
|00003c60| 53 22 20 8b 20 e7 20 69 | 6e 64 69 72 25 3e 6d 25 |S" . . i|ndir%>m%|
|00003c70| 2b 34 35 30 20 85 20 32 | 2c 22 4d 45 4e 55 20 49 |+450 . 2|,"MENU I|
|00003c80| 54 45 4d 53 20 54 4f 4f | 20 42 49 47 22 0d 13 6a |TEMS TOO| BIG"..j|
|00003c90| 10 20 fd 20 6d 65 6e 75 | 24 3d 22 2a 22 0d 13 74 |. . menu|$="*"..t|
|00003ca0| 1c 20 70 74 72 25 21 2d | 32 34 3d 70 74 72 25 21 |. ptr%!-|24=ptr%!|
|00003cb0| 2d 32 34 20 84 20 26 38 | 30 0d 13 7e 1a 20 6d 25 |-24 . &8|0..~. m%|
|00003cc0| 21 33 32 3d 6d 6d 32 25 | 3a 6d 25 21 38 30 3d 6d |!32=mm2%|:m%!80=m|
|00003cd0| 6d 33 25 0d 13 88 06 20 | e1 0d 13 92 10 20 f4 2d |m3%.... |..... .-|
|00003ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 13 9c 0e 20 dd f2 |--------|-.... ..|
|00003cf0| 70 61 6c 69 6e 69 74 0d | 13 a6 1c 20 70 30 25 21 |palinit.|... p0%!|
|00003d00| 30 3d 26 66 66 66 66 66 | 66 30 30 3a 70 30 25 21 |0=&fffff|f00:p0%!|
|00003d10| 34 3d 30 0d 13 b0 3d 20 | 70 31 25 21 30 3d 26 66 |4=0...= |p1%!0=&f|
|00003d20| 66 66 66 66 66 30 30 3a | 70 31 25 21 34 3d 26 62 |fffff00:|p1%!4=&b|
|00003d30| 62 62 62 62 62 30 30 3a | 70 31 25 21 38 3d 26 37 |bbbbb00:|p1%!8=&7|
|00003d40| 37 37 37 37 37 30 30 3a | 70 31 25 21 31 32 3d 30 |7777700:|p1%!12=0|
|00003d50| 0d 13 ba 45 20 70 32 25 | 21 30 3d 26 66 66 66 66 |...E p2%|!0=&ffff|
|00003d60| 66 66 30 30 3a 70 32 25 | 21 34 3d 26 64 64 64 64 |ff00:p2%|!4=&dddd|
|00003d70| 64 64 30 30 3a 70 32 25 | 21 38 3d 26 62 62 62 62 |dd00:p2%|!8=&bbbb|
|00003d80| 62 62 30 30 3a 70 32 25 | 21 31 32 3d 26 39 39 39 |bb00:p2%|!12=&999|
|00003d90| 39 39 39 30 30 0d 13 c4 | 40 20 70 32 25 21 31 36 |99900...|@ p2%!16|
|00003da0| 3d 26 37 37 37 37 37 37 | 30 30 3a 70 32 25 21 32 |=&777777|00:p2%!2|
|00003db0| 30 3d 26 35 35 35 35 35 | 35 30 30 3a 70 32 25 21 |0=&55555|500:p2%!|
|00003dc0| 32 34 3d 26 33 33 33 33 | 33 33 30 30 3a 70 32 25 |24=&3333|3300:p2%|
|00003dd0| 21 32 38 3d 30 0d 13 ce | 48 20 70 32 25 21 33 32 |!28=0...|H p2%!32|
|00003de0| 3d 26 39 39 34 34 30 30 | 30 30 3a 70 32 25 21 33 |=&994400|00:p2%!3|
|00003df0| 36 3d 26 30 30 65 65 65 | 65 30 30 3a 70 32 25 21 |6=&00eee|e00:p2%!|
|00003e00| 34 30 3d 26 30 30 63 63 | 30 30 30 30 3a 70 32 25 |40=&00cc|0000:p2%|
|00003e10| 21 34 34 3d 26 30 30 30 | 30 64 64 30 30 0d 13 d8 |!44=&000|0dd00...|
|00003e20| 48 20 70 32 25 21 34 38 | 3d 26 62 62 65 65 65 65 |H p2%!48|=&bbeeee|
|00003e30| 30 30 3a 70 32 25 21 35 | 32 3d 26 30 30 38 38 35 |00:p2%!5|2=&00885|
|00003e40| 35 30 30 3a 70 32 25 21 | 35 36 3d 26 30 30 62 62 |500:p2%!|56=&00bb|
|00003e50| 66 66 30 30 3a 70 32 25 | 21 36 30 3d 26 66 66 62 |ff00:p2%|!60=&ffb|
|00003e60| 62 30 30 30 30 0d 13 e2 | 45 20 70 33 25 21 30 3d |b0000...|E p3%!0=|
|00003e70| 26 30 30 30 30 30 30 30 | 30 3a 70 33 25 21 34 3d |&0000000|0:p3%!4=|
|00003e80| 26 31 30 31 30 31 30 30 | 30 3a 70 33 25 21 38 3d |&1010100|0:p3%!8=|
|00003e90| 26 32 30 32 30 32 30 30 | 30 3a 70 33 25 21 31 32 |&2020200|0:p3%!12|
|00003ea0| 3d 26 33 30 33 30 33 30 | 30 30 0d 13 ec 48 20 70 |=&303030|00...H p|
|00003eb0| 33 25 21 31 36 3d 26 30 | 30 30 30 34 30 30 30 3a |3%!16=&0|0004000:|
|00003ec0| 70 33 25 21 32 30 3d 26 | 31 30 31 30 35 30 30 30 |p3%!20=&|10105000|
|00003ed0| 3a 70 33 25 21 32 34 3d | 26 32 30 32 30 36 30 30 |:p3%!24=|&2020600|
|00003ee0| 30 3a 70 33 25 21 32 38 | 3d 26 33 30 33 30 37 30 |0:p3%!28|=&303070|
|00003ef0| 30 30 0d 13 f6 48 20 70 | 33 25 21 33 32 3d 26 34 |00...H p|3%!32=&4|
|00003f00| 30 30 30 30 30 30 30 3a | 70 33 25 21 33 36 3d 26 |0000000:|p3%!36=&|
|00003f10| 35 30 31 30 31 30 30 30 | 3a 70 33 25 21 34 30 3d |50101000|:p3%!40=|
|00003f20| 26 36 30 32 30 32 30 30 | 30 3a 70 33 25 21 34 34 |&6020200|0:p3%!44|
|00003f30| 3d 26 37 30 33 30 33 30 | 30 30 0d 14 00 48 20 70 |=&703030|00...H p|
|00003f40| 33 25 21 34 38 3d 26 34 | 30 30 30 34 30 30 30 3a |3%!48=&4|0004000:|
|00003f50| 70 33 25 21 35 32 3d 26 | 35 30 31 30 35 30 30 30 |p3%!52=&|50105000|
|00003f60| 3a 70 33 25 21 35 36 3d | 26 36 30 32 30 36 30 30 |:p3%!56=|&6020600|
|00003f70| 30 3a 70 33 25 21 36 30 | 3d 26 37 30 33 30 37 30 |0:p3%!60|=&703070|
|00003f80| 30 30 0d 14 0a 06 20 e1 | 0d 14 14 11 20 f4 2d 2d |00.... .|.... .--|
|00003f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 14 1e 0c 20 dd f2 |--------|-.... ..|
|00003fa0| 73 65 74 75 70 0d 14 28 | 68 20 de 20 61 72 65 61 |setup..(|h . area|
|00003fb0| 25 20 32 35 36 2c 65 76 | 65 6e 74 73 5f 61 72 65 |% 256,ev|ents_are|
|00003fc0| 61 20 33 30 30 30 2c 65 | 76 65 6e 74 73 5f 70 74 |a 3000,e|vents_pt|
|00003fd0| 72 20 31 35 2c 6d 69 6b | 20 36 30 30 2c 65 76 65 |r 15,mik| 600,eve|
|00003fe0| 20 31 30 30 30 2c 73 61 | 76 65 74 65 6d 70 25 20 | 1000,sa|vetemp% |
|00003ff0| 31 35 2c 6f 72 64 65 72 | 5f 79 28 35 29 2c 74 6d |15,order|_y(5),tm|
|00004000| 61 74 20 32 34 2c 62 62 | 6f 78 20 31 36 0d 14 32 |at 24,bb|ox 16..2|
|00004010| 94 20 de 20 62 69 72 74 | 68 64 61 79 24 28 31 30 |. . birt|hday$(10|
|00004020| 29 2c 65 76 65 6e 74 73 | 24 28 31 32 29 2c 66 69 |),events|$(12),fi|
|00004030| 6c 6d 73 24 28 31 32 29 | 2c 73 70 6f 72 74 73 24 |lms$(12)|,sports$|
|00004040| 28 31 30 29 2c 73 6f 6e | 67 73 24 28 31 30 29 2c |(10),son|gs$(10),|
|00004050| 63 6f 6c 6d 65 6e 75 20 | 34 35 30 2c 6f 72 64 65 |colmenu |450,orde|
|00004060| 72 73 24 28 35 29 2c 62 | 6f 72 64 65 72 73 24 28 |rs$(5),b|orders$(|
|00004070| 32 35 35 29 2c 62 6f 72 | 64 65 72 73 6d 65 6e 75 |255),bor|dersmenu|
|00004080| 25 20 36 33 30 30 2c 64 | 69 72 73 65 61 72 63 68 |% 6300,d|irsearch|
|00004090| 20 39 32 34 2c 72 75 6e | 66 69 6c 65 25 20 32 30 | 924,run|file% 20|
|000040a0| 30 0d 14 3c 3b 20 de 20 | 6d 6d 32 25 20 37 36 30 |0..<; . |mm2% 760|
|000040b0| 2c 6d 6d 33 25 20 37 36 | 30 2c 6d 6d 34 25 20 38 |,mm3% 76|0,mm4% 8|
|000040c0| 36 30 2c 6d 6f 72 64 65 | 72 25 20 36 30 30 2c 73 |60,morde|r% 600,s|
|000040d0| 61 76 65 73 70 61 63 65 | 20 38 38 30 0d 14 46 3f |avespace| 880..F?|
|000040e0| 20 c8 99 22 4f 53 5f 52 | 65 61 64 56 61 72 56 61 | .."OS_R|eadVarVa|
|000040f0| 6c 22 2c 22 21 42 69 72 | 74 68 64 61 79 24 44 69 |l","!Bir|thday$Di|
|00004100| 72 22 2c 61 72 65 61 25 | 2c 32 35 36 2c 30 2c 33 |r",area%|,256,0,3|
|00004110| 20 b8 20 2c 2c 6c 65 6e | 67 74 68 0d 14 50 3e 20 | . ,,len|gth..P> |
|00004120| 61 72 65 61 25 3f 6c 65 | 6e 67 74 68 3d 31 33 3a |area%?le|ngth=13:|
|00004130| 70 61 74 68 24 3d 24 61 | 72 65 61 25 3a 73 75 70 |path$=$a|rea%:sup|
|00004140| 5f 70 61 74 68 24 3d 70 | 61 74 68 24 3a 6c 3d a9 |_path$=p|ath$:l=.|
|00004150| 73 75 70 5f 70 61 74 68 | 24 0d 14 5a 39 20 f5 3a |sup_path|$..Z9 .:|
|00004160| 6c 2d 3d 31 3a fd 20 c1 | 73 75 70 5f 70 61 74 68 |l-=1:. .|sup_path|
|00004170| 24 2c 6c 2c 31 29 3d 22 | 2e 22 3a 73 75 70 5f 70 |$,l,1)="|.":sup_p|
|00004180| 61 74 68 24 3d c0 73 75 | 70 5f 70 61 74 68 24 2c |ath$=.su|p_path$,|
|00004190| 6c 29 0d 14 64 3d 20 59 | 24 3d 70 61 74 68 24 2b |l)..d= Y|$=path$+|
|000041a0| 22 2e 54 65 6d 70 6c 61 | 74 65 73 32 22 3a 76 77 |".Templa|tes2":vw|
|000041b0| 24 3d 22 4f 46 46 22 3a | 65 76 65 6e 74 73 5f 74 |$="OFF":|events_t|
|000041c0| 6f 67 3d 31 3a 66 6f 6e | 74 5f 6e 6f 74 3d 30 0d |og=1:fon|t_not=0.|
|000041d0| 14 6e 3e 20 de 20 70 30 | 25 20 38 2c 70 31 25 20 |.n> . p0|% 8,p1% |
|000041e0| 31 36 2c 70 32 25 20 36 | 34 2c 70 33 25 20 36 34 |16,p2% 6|4,p3% 64|
|000041f0| 2c 46 52 45 44 25 20 32 | 35 36 3a 73 6d 6f 64 65 |,FRED% 2|56:smode|
|00004200| 25 3d 2d 31 3a 6e 61 6d | 65 24 3d 22 22 0d 14 78 |%=-1:nam|e$=""..x|
|00004210| 21 20 de 20 70 61 6c 62 | 75 66 66 25 20 32 30 34 |! . palb|uff% 204|
|00004220| 38 2c 74 72 61 6e 73 32 | 25 20 32 30 34 38 0d 14 |8,trans2|% 2048..|
|00004230| 82 2e 20 de 20 74 72 61 | 6e 73 25 20 31 36 2c 72 |.. . tra|ns% 16,r|
|00004240| 65 63 74 25 20 31 36 2c | 70 6c 6f 74 61 74 25 20 |ect% 16,|plotat% |
|00004250| 38 2c 72 65 63 74 69 6e | 25 20 31 36 0d 14 8c 35 |8,rectin|% 16...5|
|00004260| 20 de 20 62 6c 6f 63 6b | 25 20 31 35 30 30 30 2c | . block|% 15000,|
|00004270| 6d 6d 65 6e 75 25 20 35 | 30 30 2c 62 6c 6f 63 6b |mmenu% 5|00,block|
|00004280| 32 25 20 32 35 36 2c 77 | 6d 65 6e 75 25 20 37 30 |2% 256,w|menu% 70|
|00004290| 30 0d 14 96 24 20 de 20 | 62 6c 6f 63 6b 33 25 20 |0...$ . |block3% |
|000042a0| 32 35 36 2c 6d 65 6e 75 | 25 20 35 30 30 2c 6d 61 |256,menu|% 500,ma|
|000042b0| 67 25 20 31 36 0d 14 a0 | 3d 20 70 72 69 6e 74 5f |g% 16...|= print_|
|000042c0| 70 61 75 73 65 3d b9 3a | 68 61 76 65 5f 62 6f 72 |pause=.:|have_bor|
|000042d0| 64 65 72 3d b9 3a 44 41 | 59 25 3d 2d 31 3a 59 45 |der=.:DA|Y%=-1:YE|
|000042e0| 41 52 25 3d 31 39 39 30 | 3a 6f 6c 64 5f 64 61 79 |AR%=1990|:old_day|
|000042f0| 3d 31 0d 14 aa 40 20 63 | 72 65 61 74 65 5f 6d 65 |=1...@ c|reate_me|
|00004300| 6e 75 3d 30 3a 6f 6c 64 | 5f 65 76 65 6e 74 73 70 |nu=0:old|_eventsp|
|00004310| 61 74 68 24 3d 22 22 3a | 73 63 72 61 70 5f 72 65 |ath$="":|scrap_re|
|00004320| 66 25 3d 30 3a 70 72 6e | 74 5f 73 74 61 74 75 73 |f%=0:prn|t_status|
|00004330| 3d 30 0d 14 b4 38 20 64 | 75 6d 3d b3 28 2d 91 29 |=0...8 d|um=.(-.)|
|00004340| 3a 68 6f 72 6f 24 3d 22 | 22 3a 70 65 72 3d 35 30 |:horo$="|":per=50|
|00004350| 3a 62 6f 74 74 6f 6d 77 | 69 6e 25 3d 30 3a 74 6f |:bottomw|in%=0:to|
|00004360| 70 77 69 6e 25 3d 31 30 | 32 34 0d 14 be 3d 20 c8 |pwin%=10|24...= .|
|00004370| 99 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 32 |."OS_Spr|iteOp",2|
|00004380| 36 35 2c 73 61 76 65 73 | 70 61 63 65 3a 21 73 61 |65,saves|pace:!sa|
|00004390| 76 65 73 70 61 63 65 3d | 38 38 30 3a 73 74 79 5f |vespace=|880:sty_|
|000043a0| 62 6c 61 6e 6b 3d a3 0d | 14 c8 43 20 73 61 76 65 |blank=..|..C save|
|000043b0| 73 70 61 63 65 21 34 3d | 30 3a 73 61 76 65 73 70 |space!4=|0:savesp|
|000043c0| 61 63 65 21 38 3d 31 36 | 3a 73 61 76 65 5f 74 6f |ace!8=16|:save_to|
|000043d0| 67 3d 30 3a 62 6f 72 64 | 65 72 5f 6e 61 6d 65 24 |g=0:bord|er_name$|
|000043e0| 3d 22 64 65 66 61 75 6c | 74 22 0d 14 d2 4a 20 c8 |="defaul|t"...J .|
|000043f0| 99 22 4f 53 5f 46 69 6c | 65 22 2c 31 36 2c 28 70 |."OS_Fil|e",16,(p|
|00004400| 61 74 68 24 2b 22 2e 52 | 55 4e 2e 21 52 55 4e 22 |ath$+".R|UN.!RUN"|
|00004410| 29 2c 72 75 6e 66 69 6c | 65 25 2c 30 20 b8 20 2c |),runfil|e%,0 . ,|
|00004420| 2c 52 46 32 25 2c 52 46 | 33 25 2c 52 46 34 25 2c |,RF2%,RF|3%,RF4%,|
|00004430| 52 46 35 25 0d 14 dc 32 | 20 c8 99 22 4f 53 5f 53 |RF5%...2| .."OS_S|
|00004440| 70 72 69 74 65 4f 70 22 | 2c 32 36 36 2c 73 61 76 |priteOp"|,266,sav|
|00004450| 65 73 70 61 63 65 2c 28 | 70 61 74 68 24 2b 22 2e |espace,(|path$+".|
|00004460| 53 41 56 45 22 29 0d 14 | e6 39 20 65 66 31 3d 31 |SAVE")..|.9 ef1=1|
|00004470| 3a 65 66 32 3d 31 3a 65 | 66 33 3d 31 3a 65 66 31 |:ef2=1:e|f3=1:ef1|
|00004480| 63 3d 37 3a 65 66 32 63 | 3d 37 3a 65 66 33 63 3d |c=7:ef2c|=7:ef3c=|
|00004490| 37 3a 76 69 65 77 5f 73 | 74 61 74 75 73 3d 30 0d |7:view_s|tatus=0.|
|000044a0| 14 f0 3e 20 4d 4f 4e 54 | 48 25 3d 31 3a 4d 4f 4e |..> MONT|H%=1:MON|
|000044b0| 54 48 24 3d 22 4a 61 6e | 75 61 72 79 22 3a 6d 64 |TH$="Jan|uary":md|
|000044c0| 61 74 61 62 6c 6f 63 6b | 25 3d 93 3a 6d 64 61 74 |atablock|%=.:mdat|
|000044d0| 61 62 6c 6f 63 6b 5f 65 | 6e 64 25 3d 93 0d 14 fa |ablock_e|nd%=....|
|000044e0| 42 20 62 69 72 74 68 73 | 74 6f 6e 65 24 3d 22 47 |B births|tone$="G|
|000044f0| 61 72 6e 65 74 22 3a 62 | 69 72 74 68 70 6c 61 6e |arnet":b|irthplan|
|00004500| 74 24 3d 22 53 6e 6f 77 | 64 72 6f 70 22 3a 72 65 |t$="Snow|drop":re|
|00004510| 67 24 3d 22 2e 28 52 65 | 67 75 6c 61 72 29 22 0d |g$=".(Re|gular)".|
|00004520| 15 04 3b 20 6f 72 64 65 | 72 73 24 28 31 29 3d 22 |..; orde|rs$(1)="|
|00004530| 46 61 6d 6f 75 73 20 42 | 69 72 74 68 64 61 79 73 |Famous B|irthdays|
|00004540| 22 3a 6f 72 64 65 72 73 | 24 28 32 29 3d 22 4f 6e |":orders|$(2)="On|
|00004550| 20 54 68 69 73 20 44 61 | 79 22 0d 15 0e 3c 20 6f | This Da|y"...< o|
|00004560| 72 64 65 72 73 24 28 33 | 29 3d 22 46 69 6c 6d 73 |rders$(3|)="Films|
|00004570| 20 26 20 53 6f 6e 67 73 | 22 3a 6f 72 64 65 72 73 | & Songs|":orders|
|00004580| 24 28 34 29 3d 22 53 70 | 6f 72 74 69 6e 67 20 45 |$(4)="Sp|orting E|
|00004590| 76 65 6e 74 73 22 0d 15 | 18 1b 20 6f 72 64 65 72 |vents"..|.. order|
|000045a0| 73 24 28 35 29 3d 22 48 | 6f 72 6f 73 63 6f 70 65 |s$(5)="H|oroscope|
|000045b0| 22 0d 15 22 42 20 c8 99 | 22 4f 53 5f 52 65 61 64 |".."B ..|"OS_Read|
|000045c0| 56 61 72 56 61 6c 22 2c | 22 42 69 72 74 68 64 61 |VarVal",|"Birthda|
|000045d0| 79 24 42 6f 72 64 65 72 | 73 22 2c 61 72 65 61 25 |y$Border|s",area%|
|000045e0| 2c 32 35 36 2c 30 2c 33 | 20 b8 20 2c 2c 6c 65 6e |,256,0,3| . ,,len|
|000045f0| 67 74 68 0d 15 2c 40 20 | 61 72 65 61 25 3f 6c 65 |gth..,@ |area%?le|
|00004600| 6e 67 74 68 3d 31 33 3a | 62 6f 72 64 65 72 5f 70 |ngth=13:|border_p|
|00004610| 61 74 68 24 3d 24 61 72 | 65 61 25 3a 64 65 66 61 |ath$=$ar|ea%:defa|
|00004620| 75 6c 74 5f 62 24 3d 62 | 6f 72 64 65 72 5f 70 61 |ult_b$=b|order_pa|
|00004630| 74 68 24 0d 15 36 3f 20 | c8 99 22 4f 53 5f 52 65 |th$..6? |.."OS_Re|
|00004640| 61 64 56 61 72 56 61 6c | 22 2c 22 42 69 72 74 68 |adVarVal|","Birth|
|00004650| 64 61 79 5f 54 61 69 6c | 22 2c 46 52 45 44 25 2c |day_Tail|",FRED%,|
|00004660| 32 35 36 2c 30 2c 33 20 | b8 20 2c 2c 6c 65 6e 67 |256,0,3 |. ,,leng|
|00004670| 74 68 0d 15 40 55 20 46 | 52 45 44 25 3f 6c 65 6e |th..@U F|RED%?len|
|00004680| 67 74 68 3d 31 33 3a 63 | 6f 6d 64 24 3d 24 46 52 |gth=13:c|omd$=$FR|
|00004690| 45 44 25 3a 62 65 72 74 | 25 3d ad 28 63 6f 6d 64 |ED%:bert|%=.(comd|
|000046a0| 24 2b 22 2e 21 52 75 6e | 22 29 3a e7 20 62 65 72 |$+".!Run|"):. ber|
|000046b0| 74 25 3d 30 20 63 6f 6d | 64 24 3d 22 22 20 8b 20 |t%=0 com|d$="" . |
|000046c0| d9 23 62 65 72 74 25 0d | 15 4a 06 20 e1 0d 15 54 |.#bert%.|.J. ...T|
|000046d0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 15 5e |. .-----|-----..^|
|000046e0| 0d 20 dd f2 73 65 74 75 | 70 32 0d 15 68 46 20 de |. ..setu|p2..hF .|
|000046f0| 20 66 6f 6e 74 73 24 28 | 35 31 32 29 2c 66 6f 6e | fonts$(|512),fon|
|00004700| 74 62 75 66 25 20 31 30 | 30 2c 64 73 6b 25 20 31 |tbuf% 10|0,dsk% 1|
|00004710| 32 30 2c 73 70 72 6e 61 | 6d 65 25 20 31 33 2c 69 |20,sprna|me% 13,i|
|00004720| 63 6f 6e 73 70 61 63 65 | 20 31 36 2a 31 30 32 34 |conspace| 16*1024|
|00004730| 0d 15 72 2c 20 de 20 66 | 5f 61 6e 73 25 20 31 30 |..r, . f|_ans% 10|
|00004740| 30 2c 77 69 6e 5f 69 64 | 65 6e 25 20 31 31 2c 69 |0,win_id|en% 11,i|
|00004750| 6e 25 20 31 32 2c 6f 75 | 25 20 31 32 0d 15 7c 2a |n% 12,ou|% 12..|*|
|00004760| 20 de 20 77 64 61 74 61 | 31 25 20 31 35 30 30 30 | . wdata|1% 15000|
|00004770| 3a 77 64 31 65 6e 64 25 | 3d 77 64 61 74 61 31 25 |:wd1end%|=wdata1%|
|00004780| 2b 31 35 30 30 30 0d 15 | 86 3e 20 69 6e 25 21 30 |+15000..|.> in%!0|
|00004790| 3d 31 32 3a 69 6e 25 21 | 34 3d 35 3a 69 6e 25 21 |=12:in%!|4=5:in%!|
|000047a0| 38 3d 2d 31 3a c8 99 22 | 4f 53 5f 52 65 61 64 56 |8=-1:.."|OS_ReadV|
|000047b0| 64 75 56 61 72 69 61 62 | 6c 65 73 22 2c 69 6e 25 |duVariab|les",in%|
|000047c0| 2c 6f 75 25 0d 15 90 2a | 20 74 6f 70 5f 79 3d 28 |,ou%...*| top_y=(|
|000047d0| 6f 75 25 21 30 29 2b 31 | 3a 74 6f 70 5f 79 3d 28 |ou%!0)+1|:top_y=(|
|000047e0| 32 5e 6f 75 25 21 34 29 | 2a 74 6f 70 5f 79 0d 15 |2^ou%!4)|*top_y..|
|000047f0| 9a 3e 20 69 6e 25 21 30 | 3d 31 31 3a 69 6e 25 21 |.> in%!0|=11:in%!|
|00004800| 34 3d 34 3a 69 6e 25 21 | 38 3d 2d 31 3a c8 99 22 |4=4:in%!|8=-1:.."|
|00004810| 4f 53 5f 52 65 61 64 56 | 64 75 56 61 72 69 61 62 |OS_ReadV|duVariab|
|00004820| 6c 65 73 22 2c 69 6e 25 | 2c 6f 75 25 0d 15 a4 2a |les",in%|,ou%...*|
|00004830| 20 74 6f 70 5f 78 3d 28 | 6f 75 25 21 30 29 2b 31 | top_x=(|ou%!0)+1|
|00004840| 3a 74 6f 70 5f 78 3d 28 | 32 5e 6f 75 25 21 34 29 |:top_x=(|2^ou%!4)|
|00004850| 2a 74 6f 70 5f 78 0d 15 | ae 35 20 c8 99 22 4f 53 |*top_x..|.5 .."OS|
|00004860| 5f 53 70 72 69 74 65 4f | 70 22 2c 32 36 35 2c 69 |_SpriteO|p",265,i|
|00004870| 63 6f 6e 73 70 61 63 65 | 3a 21 69 63 6f 6e 73 70 |conspace|:!iconsp|
|00004880| 61 63 65 3d 31 36 2a 31 | 30 32 34 0d 15 b8 21 20 |ace=16*1|024...! |
|00004890| 69 63 6f 6e 73 70 61 63 | 65 21 34 3d 30 3a 69 63 |iconspac|e!4=0:ic|
|000048a0| 6f 6e 73 70 61 63 65 21 | 38 3d 31 36 0d 15 c2 13 |onspace!|8=16....|
|000048b0| 20 24 62 6c 6f 63 6b 25 | 3d 22 54 41 53 4b 22 0d | $block%|="TASK".|
|000048c0| 15 cc 40 20 c8 99 22 57 | 69 6d 70 5f 49 6e 69 74 |..@ .."W|imp_Init|
|000048d0| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 62 6c 6f |ialise",|200,!blo|
|000048e0| 63 6b 25 2c 22 42 69 72 | 74 68 64 61 79 22 20 b8 |ck%,"Bir|thday" .|
|000048f0| 20 76 65 72 73 69 6f 6e | 25 2c 74 61 73 6b 25 0d | version|%,task%.|
|00004900| 15 d6 16 20 71 75 69 74 | 25 3d a3 3a f2 72 65 61 |... quit|%=.:.rea|
|00004910| 64 5f 76 65 72 0d 15 e0 | 19 20 59 31 24 3d 70 61 |d_ver...|. Y1$=pa|
|00004920| 74 68 24 2b 22 2e 69 63 | 6f 6e 73 32 32 22 0d 15 |th$+".ic|ons22"..|
|00004930| ea 5e 20 c8 99 22 4f 53 | 5f 52 65 61 64 4d 6f 64 |.^ .."OS|_ReadMod|
|00004940| 65 56 61 72 69 61 62 6c | 65 22 2c 2d 31 2c 35 20 |eVariabl|e",-1,5 |
|00004950| b8 20 2c 2c 79 6d 61 67 | 32 3a e7 20 79 6d 61 67 |. ,,ymag|2:. ymag|
|00004960| 32 3e 31 20 59 31 24 3d | 70 61 74 68 24 2b 22 2e |2>1 Y1$=|path$+".|
|00004970| 69 63 6f 6e 73 22 3a 59 | 24 3d 70 61 74 68 24 2b |icons":Y|$=path$+|
|00004980| 22 2e 54 65 6d 70 6c 61 | 74 65 73 22 0d 15 f4 5e |".Templa|tes"...^|
|00004990| 20 c8 99 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 | .."OS_R|eadModeV|
|000049a0| 61 72 69 61 62 6c 65 22 | 2c 2d 31 2c 34 20 b8 20 |ariable"|,-1,4 . |
|000049b0| 2c 2c 78 6d 61 67 32 3a | e7 20 78 6d 61 67 32 3e |,,xmag2:|. xmag2>|
|000049c0| 31 20 59 31 24 3d 70 61 | 74 68 24 2b 22 2e 69 63 |1 Y1$=pa|th$+".ic|
|000049d0| 6f 6e 73 22 3a 59 24 3d | 70 61 74 68 24 2b 22 2e |ons":Y$=|path$+".|
|000049e0| 54 65 6d 70 6c 61 74 65 | 73 22 0d 15 fe 1e 20 c8 |Template|s".... .|
|000049f0| 99 22 57 69 6d 70 5f 4f | 70 65 6e 54 65 6d 70 6c |."Wimp_O|penTempl|
|00004a00| 61 74 65 22 2c 2c 59 24 | 0d 16 08 34 20 77 68 61 |ate",,Y$|...4 wha|
|00004a10| 6e 64 6c 65 31 25 3d a4 | 54 65 6d 70 28 22 4d 61 |ndle1%=.|Temp("Ma|
|00004a20| 69 6e 22 29 3a 77 68 61 | 6e 64 6c 65 32 25 3d a4 |in"):wha|ndle2%=.|
|00004a30| 54 65 6d 70 28 22 49 6e | 66 6f 22 29 0d 16 12 34 |Temp("In|fo")...4|
|00004a40| 20 76 69 65 77 5f 77 69 | 6e 25 3d a4 54 65 6d 70 | view_wi|n%=.Temp|
|00004a50| 28 22 56 69 65 77 22 29 | 3a 65 72 72 62 6f 78 25 |("View")|:errbox%|
|00004a60| 3d a4 54 65 6d 70 28 22 | 65 72 72 62 6f 78 22 29 |=.Temp("|errbox")|
|00004a70| 0d 16 1c 36 20 73 61 76 | 65 5f 77 69 6e 25 3d a4 |...6 sav|e_win%=.|
|00004a80| 54 65 6d 70 28 22 73 61 | 76 65 22 29 3a 73 63 61 |Temp("sa|ve"):sca|
|00004a90| 6c 65 5f 77 69 6e 25 3d | a4 54 65 6d 70 28 22 73 |le_win%=|.Temp("s|
|00004aa0| 63 61 6c 65 22 29 0d 16 | 26 30 20 73 61 76 65 32 |cale")..|&0 save2|
|00004ab0| 5f 77 69 6e 25 3d a4 54 | 65 6d 70 28 22 73 61 76 |_win%=.T|emp("sav|
|00004ac0| 65 32 22 29 3a 72 65 67 | 25 3d a4 54 65 6d 70 28 |e2"):reg|%=.Temp(|
|00004ad0| 22 72 65 67 22 29 0d 16 | 30 39 20 77 68 61 6e 64 |"reg")..|09 whand|
|00004ae0| 6c 65 39 25 3d a4 54 65 | 6d 70 28 22 77 61 72 6e |le9%=.Te|mp("warn|
|00004af0| 69 6e 67 22 29 3a 63 6c | 6f 73 65 5f 77 69 6e 25 |ing"):cl|ose_win%|
|00004b00| 3d a4 54 65 6d 70 28 22 | 63 6c 6f 73 65 22 29 0d |=.Temp("|close").|
|00004b10| 16 3a 36 20 66 6f 6e 74 | 5f 77 69 6e 25 3d a4 54 |.:6 font|_win%=.T|
|00004b20| 65 6d 70 28 22 66 6f 6e | 74 22 29 3a 70 72 69 6e |emp("fon|t"):prin|
|00004b30| 74 5f 77 69 6e 25 3d a4 | 54 65 6d 70 28 22 70 72 |t_win%=.|Temp("pr|
|00004b40| 69 6e 74 22 29 0d 16 44 | 1b 20 c8 99 22 57 69 6d |int")..D|. .."Wim|
|00004b50| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00004b60| 0d 16 4e 26 20 c8 99 22 | 4f 53 5f 53 70 72 69 74 |..N& .."|OS_Sprit|
|00004b70| 65 4f 70 22 2c 32 36 36 | 2c 69 63 6f 6e 73 70 61 |eOp",266|,iconspa|
|00004b80| 63 65 2c 59 31 24 0d 16 | 58 0d 20 f2 70 61 6c 69 |ce,Y1$..|X. .pali|
|00004b90| 6e 69 74 0d 16 62 3a 20 | 69 62 61 72 31 25 3d a4 |nit..b: |ibar1%=.|
|00004ba0| 69 63 6f 6e 64 65 66 28 | 2d 31 2c 30 2c 30 2c 36 |icondef(|-1,0,0,6|
|00004bb0| 38 2c 36 38 2c 26 33 30 | 30 32 2c 22 21 42 69 72 |8,68,&30|02,"!Bir|
|00004bc0| 74 68 64 61 79 22 2c 30 | 2c 30 2c 30 29 0d 16 6c |thday",0|,0,0)..l|
|00004bd0| 06 20 e1 0d 16 76 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ...v. |.-------|
|00004be0| 2d 2d 2d 0d 16 80 0d 20 | dd f2 73 65 74 75 70 33 |---.... |..setup3|
|00004bf0| 0d 16 8a 2e 20 59 37 24 | 3d 70 61 74 68 24 2b 22 |.... Y7$|=path$+"|
|00004c00| 2e 4d 65 73 73 61 67 65 | 73 22 3a de 20 6d 65 73 |.Message|s":. mes|
|00004c10| 73 61 67 65 5f 61 72 65 | 61 20 33 30 30 30 0d 16 |sage_are|a 3000..|
|00004c20| 94 28 20 de 20 6d 65 73 | 73 61 67 65 5f 70 74 72 |.( . mes|sage_ptr|
|00004c30| 20 31 35 2c 73 71 75 25 | 20 31 36 2c 4d 62 75 66 | 15,squ%| 16,Mbuf|
|00004c40| 66 25 20 32 35 36 0d 16 | 9e 3b 20 c8 99 22 4d 65 |f% 256..|.; .."Me|
|00004c50| 73 73 61 67 65 54 72 61 | 6e 73 5f 4f 70 65 6e 46 |ssageTra|ns_OpenF|
|00004c60| 69 6c 65 22 2c 6d 65 73 | 73 61 67 65 5f 70 74 72 |ile",mes|sage_ptr|
|00004c70| 2c 59 37 24 2c 6d 65 73 | 73 61 67 65 5f 61 72 65 |,Y7$,mes|sage_are|
|00004c80| 61 0d 16 a8 29 20 f2 72 | 6d 28 22 76 65 72 6e 22 |a...) .r|m("vern"|
|00004c90| 29 3a f2 69 73 65 74 28 | 37 2c 74 65 78 74 24 2c |):.iset(|7,text$,|
|00004ca0| 77 68 61 6e 64 6c 65 32 | 25 29 0d 16 b2 06 20 e1 |whandle2|%).... .|
|00004cb0| 0d 16 bc 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00004cc0| 0d 16 c6 0e 20 dd f2 72 | 6d 28 72 6d 24 29 0d 16 |.... ..r|m(rm$)..|
|00004cd0| d0 40 20 c8 99 22 4d 65 | 73 73 61 67 65 54 72 61 |.@ .."Me|ssageTra|
|00004ce0| 6e 73 5f 4c 6f 6f 6b 75 | 70 22 2c 6d 65 73 73 61 |ns_Looku|p",messa|
|00004cf0| 67 65 5f 70 74 72 2c 72 | 6d 24 2c 30 20 b8 20 2c |ge_ptr,r|m$,0 . ,|
|00004d00| 2c 6d 5f 70 74 72 25 2c | 6d 5f 6c 65 6e 25 0d 16 |,m_ptr%,|m_len%..|
|00004d10| da 3d 20 74 65 78 74 24 | 3d 22 22 3a e3 20 6c 6f |.= text$|="":. lo|
|00004d20| 6f 70 31 34 3d 30 20 b8 | 20 6d 5f 6c 65 6e 25 2d |op14=0 .| m_len%-|
|00004d30| 31 3a 74 65 78 74 24 2b | 3d bd 28 6d 5f 70 74 72 |1:text$+|=.(m_ptr|
|00004d40| 25 3f 6c 6f 6f 70 31 34 | 29 3a ed 0d 16 e4 06 20 |%?loop14|):..... |
|00004d50| e1 0d 16 ee 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00004d60| 2d 0d 16 f8 0d 20 dd a4 | 6d 73 28 41 24 29 0d 17 |-.... ..|ms(A$)..|
|00004d70| 02 09 20 ea 20 4c 25 0d | 17 0c 43 20 c8 99 22 4d |.. . L%.|..C .."M|
|00004d80| 65 73 73 61 67 65 54 72 | 61 6e 73 5f 4c 6f 6f 6b |essageTr|ans_Look|
|00004d90| 75 70 22 2c 6d 65 73 73 | 61 67 65 5f 70 74 72 2c |up",mess|age_ptr,|
|00004da0| 41 24 2c 4d 62 75 66 66 | 25 2c 32 35 36 2c 22 22 |A$,Mbuff|%,256,""|
|00004db0| 2c 22 22 20 b8 2c 2c 2c | 4c 25 0d 17 16 1a 20 4d |,"" .,,,|L%.... M|
|00004dc0| 62 75 66 66 25 3f 4c 25 | 3d 31 33 3a 3d 24 4d 62 |buff%?L%|=13:=$Mb|
|00004dd0| 75 66 66 25 0d 17 20 10 | 20 f4 2d 2d 2d 2d 2d 2d |uff%.. .| .------|
|00004de0| 2d 2d 2d 2d 0d 17 2a 25 | 20 dd f2 64 65 6c 61 79 |----..*%| ..delay|
|00004df0| 3a e3 20 74 69 6d 65 5f | 6c 6f 6f 70 3d 31 20 b8 |:. time_|loop=1 .|
|00004e00| 20 34 30 30 30 3a ed 3a | e1 0d 17 34 10 20 f4 2d | 4000:.:|...4. .-|
|00004e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 17 3e 0d 20 dd f2 |--------|-..>. ..|
|00004e20| 63 61 72 64 5f 78 0d 17 | 48 24 20 c8 99 22 57 69 |card_x..|H$ .."Wi|
|00004e30| 6d 70 5f 50 6f 6c 6c 22 | 2c 2c 62 6c 6f 63 6b 25 |mp_Poll"|,,block%|
|00004e40| 20 b8 20 72 65 61 73 6f | 6e 25 0d 17 52 11 20 c8 | . reaso|n%..R. .|
|00004e50| 8e 20 72 65 61 73 6f 6e | 25 20 ca 0d 17 5c 12 20 |. reason|% ...\. |
|00004e60| 20 c9 20 31 20 3a f2 72 | 65 64 72 61 77 0d 17 66 | . 1 :.r|edraw..f|
|00004e70| 26 20 20 c9 20 32 20 3a | c8 99 22 57 69 6d 70 5f |& . 2 :|.."Wimp_|
|00004e80| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|00004e90| 63 6b 25 0d 17 70 06 20 | cb 0d 17 7a 06 20 e1 0d |ck%..p. |...z. ..|
|00004ea0| 17 84 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00004eb0| 17 8e 12 20 dd f2 61 6c | 65 72 74 32 28 6d 65 24 |... ..al|ert2(me$|
|00004ec0| 29 0d 17 98 28 20 f2 69 | 73 65 74 28 31 2c 6d 65 |)...( .i|set(1,me|
|00004ed0| 24 2c 63 6c 6f 73 65 5f | 77 69 6e 25 29 3a 61 6c |$,close_|win%):al|
|00004ee0| 65 72 74 3d 2d 31 3a ef | 37 0d 17 a2 37 20 62 6c |ert=-1:.|7...7 bl|
|00004ef0| 6f 63 6b 25 21 30 3d 63 | 6c 6f 73 65 5f 77 69 6e |ock%!0=c|lose_win|
|00004f00| 25 3a c8 99 22 57 69 6d | 70 5f 47 65 74 57 69 6e |%:.."Wim|p_GetWin|
|00004f10| 64 6f 77 49 6e 66 6f 22 | 2c 2c 62 6c 6f 63 6b 25 |dowInfo"|,,block%|
|00004f20| 0d 17 ac 32 20 62 6c 6f | 63 6b 25 21 34 3d 28 74 |...2 blo|ck%!4=(t|
|00004f30| 6f 70 5f 78 2f 32 29 2d | 33 37 30 3a 62 6c 6f 63 |op_x/2)-|370:bloc|
|00004f40| 6b 25 21 31 32 3d 62 6c | 6f 63 6b 25 21 34 2b 37 |k%!12=bl|ock%!4+7|
|00004f50| 34 30 0d 17 b6 32 20 62 | 6c 6f 63 6b 25 21 38 3d |40...2 b|lock%!8=|
|00004f60| 28 74 6f 70 5f 79 2f 32 | 29 2d 31 35 38 3a 62 6c |(top_y/2|)-158:bl|
|00004f70| 6f 63 6b 25 21 31 36 3d | 62 6c 6f 63 6b 25 21 38 |ock%!16=|block%!8|
|00004f80| 2b 33 31 36 0d 17 c0 4a | 20 78 31 3d 62 6c 6f 63 |+316...J| x1=bloc|
|00004f90| 6b 25 21 34 3a 79 31 3d | 62 6c 6f 63 6b 25 21 38 |k%!4:y1=|block%!8|
|00004fa0| 3a 77 69 64 3d 62 6c 6f | 63 6b 25 21 31 32 2d 62 |:wid=blo|ck%!12-b|
|00004fb0| 6c 6f 63 6b 25 21 34 3a | 68 67 74 3d 62 6c 6f 63 |lock%!4:|hgt=bloc|
|00004fc0| 6b 25 21 31 36 2d 62 6c | 6f 63 6b 25 21 38 0d 17 |k%!16-bl|ock%!8..|
|00004fd0| ca 34 20 c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |.4 .."Wi|mp_OpenW|
|00004fe0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 3a c8 |indow",,|block%:.|
|00004ff0| 97 20 c8 93 20 78 31 2c | 79 31 2c 77 69 64 2c 68 |. .. x1,|y1,wid,h|
|00005000| 67 74 0d 17 d4 06 20 f5 | 0d 17 de 26 20 20 c8 99 |gt.... .|...& ..|
|00005010| 20 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 2c 2c 62 6c | "Wimp_P|oll",,bl|
|00005020| 6f 63 6b 25 20 b8 20 72 | 65 61 73 6f 6e 25 0d 17 |ock% . r|eason%..|
|00005030| e8 13 20 20 20 c8 8e 20 | 72 65 61 73 6f 6e 25 20 |.. .. |reason% |
|00005040| ca 0d 17 f2 13 20 20 20 | 20 c9 20 31 3a f2 72 65 |..... | . 1:.re|
|00005050| 64 72 61 77 0d 17 fc 27 | 20 20 20 20 c9 20 32 3a |draw...'| . 2:|
|00005060| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00005070| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 18 06 21 20 |ow",,blo|ck%...! |
|00005080| 20 20 20 c9 20 36 3a e7 | 20 62 6c 6f 63 6b 25 21 | . 6:.| block%!|
|00005090| 31 36 3d 30 20 61 6c 65 | 72 74 3d 33 0d 18 10 24 |16=0 ale|rt=3...$|
|000050a0| 20 20 20 20 20 20 20 20 | 20 20 20 e7 20 62 6c 6f | | . blo|
|000050b0| 63 6b 25 21 31 36 3d 32 | 20 61 6c 65 72 74 3d 32 |ck%!16=2| alert=2|
|000050c0| 0d 18 1a 24 20 20 20 20 | 20 20 20 20 20 20 20 e7 |...$ | .|
|000050d0| 20 62 6c 6f 63 6b 25 21 | 31 36 3d 33 20 61 6c 65 | block%!|16=3 ale|
|000050e0| 72 74 3d 31 0d 18 24 08 | 20 20 20 cb 0d 18 2e 10 |rt=1..$.| .....|
|000050f0| 20 fd 20 61 6c 65 72 74 | 3c 3e 2d 31 0d 18 38 1f | . alert|<>-1..8.|
|00005100| 20 f2 72 65 73 74 6f 72 | 65 66 75 6c 6c 6d 6f 75 | .restor|efullmou|
|00005110| 73 65 72 65 63 74 61 6e | 67 6c 65 0d 18 42 35 20 |serectan|gle..B5 |
|00005120| 62 6c 6f 63 6b 25 21 30 | 3d 63 6c 6f 73 65 5f 77 |block%!0|=close_w|
|00005130| 69 6e 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |in%:.."W|imp_Clos|
|00005140| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00005150| 0d 18 4c 06 20 e1 0d 18 | 56 10 20 f4 2d 2d 2d 2d |..L. ...|V. .----|
|00005160| 2d 2d 2d 2d 2d 2d 0d 18 | 60 23 20 dd f2 66 72 61 |------..|`# ..fra|
|00005170| 6d 65 28 66 78 25 2c 66 | 79 25 2c 77 64 25 2c 68 |me(fx%,f|y%,wd%,h|
|00005180| 74 25 2c 68 65 61 64 24 | 29 0d 18 6a 2c 20 6c 25 |t%,head$|)..j, l%|
|00005190| 3d 28 31 36 2a 28 31 2b | a9 68 65 61 64 24 29 29 |=(16*(1+|.head$))|
|000051a0| 2b 38 3a 68 25 3d 35 34 | 3a e7 20 eb 3e 31 35 20 |+8:h%=54|:. .>15 |
|000051b0| 68 25 3d 35 32 0d 18 74 | 19 20 c8 99 22 57 69 6d |h%=52..t|. .."Wim|
|000051c0| 70 5f 53 65 74 43 6f 6c | 6f 75 72 22 2c 30 0d 18 |p_SetCol|our",0..|
|000051d0| 7e 21 20 c8 93 20 66 78 | 25 2b 31 36 2c 66 79 25 |~! .. fx|%+16,fy%|
|000051e0| 2b 68 74 25 2d 32 34 2c | 6c 25 2c 68 25 2d 32 0d |+ht%-24,|l%,h%-2.|
|000051f0| 18 88 23 20 c8 93 20 66 | 78 25 2b 31 36 2b 32 2c |..# .. f|x%+16+2,|
|00005200| 66 79 25 2b 68 74 25 2d | 32 34 2c 6c 25 2d 34 2c |fy%+ht%-|24,l%-4,|
|00005210| 68 25 0d 18 92 2d 20 c8 | 99 22 57 69 6d 70 5f 53 |h%...- .|."Wimp_S|
|00005220| 65 74 43 6f 6c 6f 75 72 | 22 2c 34 3a ec 20 66 78 |etColour|",4:. fx|
|00005230| 25 2b 31 38 2c 66 79 25 | 2b 68 74 25 2d 32 34 0d |%+18,fy%|+ht%-24.|
|00005240| 18 9c 1d 20 df 20 66 78 | 25 2b 31 38 2b 6c 25 2d |... . fx|%+18+l%-|
|00005250| 34 2c 66 79 25 2b 68 74 | 25 2d 32 34 0d 18 a6 31 |4,fy%+ht|%-24...1|
|00005260| 20 ec 20 66 78 25 2b 31 | 38 2c 66 79 25 2b 68 74 | . fx%+1|8,fy%+ht|
|00005270| 25 2d 32 32 3a df 20 66 | 78 25 2b 31 38 2b 6c 25 |%-22:. f|x%+18+l%|
|00005280| 2d 34 2c 66 79 25 2b 68 | 74 25 2d 32 32 0d 18 b0 |-4,fy%+h|t%-22...|
|00005290| 37 20 ec 20 66 78 25 2b | 31 36 2b 6c 25 2c 66 79 |7 . fx%+|16+l%,fy|
|000052a0| 25 2b 68 74 25 2d 32 34 | 3a df 20 66 78 25 2b 31 |%+ht%-24|:. fx%+1|
|000052b0| 36 2b 6c 25 2c 66 79 25 | 2b 68 74 25 2b 28 68 25 |6+l%,fy%|+ht%+(h%|
|000052c0| 2d 32 34 29 0d 18 ba 37 | 20 ec 20 66 78 25 2b 31 |-24)...7| . fx%+1|
|000052d0| 34 2b 6c 25 2c 66 79 25 | 2b 68 74 25 2d 32 34 3a |4+l%,fy%|+ht%-24:|
|000052e0| df 20 66 78 25 2b 31 34 | 2b 6c 25 2c 66 79 25 2b |. fx%+14|+l%,fy%+|
|000052f0| 68 74 25 2b 28 68 25 2d | 32 34 29 0d 18 c4 04 0d |ht%+(h%-|24).....|
|00005300| 18 ce 2c 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |.., .."W|imp_SetC|
|00005310| 6f 6c 6f 75 72 22 2c 30 | 3a c8 93 20 66 78 25 2c |olour",0|:.. fx%,|
|00005320| 66 79 25 2c 77 64 25 2c | 68 74 25 0d 18 d8 36 20 |fy%,wd%,|ht%...6 |
|00005330| c8 93 20 66 78 25 2b 32 | 2c 66 79 25 2c 77 64 25 |.. fx%+2|,fy%,wd%|
|00005340| 2d 34 2c 68 74 25 3a c8 | 93 20 66 78 25 2b 34 2c |-4,ht%:.|. fx%+4,|
|00005350| 66 79 25 2b 34 2c 77 64 | 25 2d 38 2c 68 74 25 2d |fy%+4,wd|%-8,ht%-|
|00005360| 36 0d 18 e2 20 20 c8 93 | 20 66 78 25 2b 36 2c 66 |6... ..| fx%+6,f|
|00005370| 79 25 2b 34 2c 77 64 25 | 2d 31 32 2c 68 74 25 2d |y%+4,wd%|-12,ht%-|
|00005380| 32 0d 18 ec 20 20 ec 20 | 66 78 25 2c 66 79 25 2b |2... . |fx%,fy%+|
|00005390| 32 3a df 20 66 78 25 2b | 77 64 25 2c 66 79 25 2b |2:. fx%+|wd%,fy%+|
|000053a0| 32 0d 18 f6 27 20 ec 20 | 66 78 25 2c 66 79 25 2b |2...' . |fx%,fy%+|
|000053b0| 68 74 25 2b 32 3a df 20 | 66 78 25 2b 31 30 2c 66 |ht%+2:. |fx%+10,f|
|000053c0| 79 25 2b 68 74 25 2b 32 | 0d 19 00 35 20 c8 99 22 |y%+ht%+2|...5 .."|
|000053d0| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|000053e0| 34 3a ec 20 66 78 25 2b | 32 2c 66 79 25 3a df 20 |4:. fx%+|2,fy%:. |
|000053f0| 66 78 25 2b 77 64 25 2d | 32 2c 66 79 25 0d 19 0a |fx%+wd%-|2,fy%...|
|00005400| 48 20 ec 20 66 78 25 2b | 77 64 25 2c 66 79 25 3a |H . fx%+|wd%,fy%:|
|00005410| df 20 66 78 25 2b 77 64 | 25 2c 66 79 25 2b 68 74 |. fx%+wd|%,fy%+ht|
|00005420| 25 3a ec 20 66 78 25 2b | 77 64 25 2d 32 2c 66 79 |%:. fx%+|wd%-2,fy|
|00005430| 25 3a df 20 66 78 25 2b | 77 64 25 2d 32 2c 66 79 |%:. fx%+|wd%-2,fy|
|00005440| 25 2b 68 74 25 0d 19 14 | 22 20 ec 20 66 78 25 2b |%+ht%...|" . fx%+|
|00005450| 34 2c 66 79 25 3a df 20 | 66 78 25 2b 34 2c 66 79 |4,fy%:. |fx%+4,fy|
|00005460| 25 2b 68 74 25 2d 32 0d | 19 1e 24 20 ec 20 66 78 |%+ht%-2.|..$ . fx|
|00005470| 25 2b 36 2c 66 79 25 2b | 34 3a df 20 66 78 25 2b |%+6,fy%+|4:. fx%+|
|00005480| 36 2c 66 79 25 2b 68 74 | 25 2d 32 0d 19 28 2c 20 |6,fy%+ht|%-2..(, |
|00005490| ec 20 66 78 25 2b 34 2c | 66 79 25 2b 68 74 25 2d |. fx%+4,|fy%+ht%-|
|000054a0| 32 3a df 20 66 78 25 2b | 77 64 25 2d 36 2c 66 79 |2:. fx%+|wd%-6,fy|
|000054b0| 25 2b 68 74 25 2d 32 0d | 19 32 04 0d 19 3c 3d 20 |%+ht%-2.|.2...<= |
|000054c0| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|000054d0| 72 22 2c 31 3a c8 93 20 | c8 90 20 66 78 25 2b 32 |r",1:.. |.. fx%+2|
|000054e0| 32 2c 66 79 25 2b 68 74 | 25 2d 31 38 2c 6c 25 2d |2,fy%+ht|%-18,l%-|
|000054f0| 31 30 2c 34 38 2d 31 30 | 0d 19 46 37 20 c8 99 22 |10,48-10|..F7 .."|
|00005500| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00005510| 37 3a ec 20 66 78 25 2b | 31 36 2b 31 32 2c 66 79 |7:. fx%+|16+12,fy|
|00005520| 25 2b 68 74 25 2b 31 36 | 3a f1 68 65 61 64 24 0d |%+ht%+16|:.head$.|
|00005530| 19 50 06 20 e1 0d 19 5a | 10 20 f4 2d 2d 2d 2d 2d |.P. ...Z|. .-----|
|00005540| 2d 2d 2d 2d 2d 0d 19 64 | 0f 20 dd f2 6f 70 65 6e |-----..d|. ..open|
|00005550| 6d 61 69 6e 0d 19 6e 37 | 20 62 6c 6f 63 6b 25 21 |main..n7| block%!|
|00005560| 30 3d 77 68 61 6e 64 6c | 65 31 25 3a c8 99 22 57 |0=whandl|e1%:.."W|
|00005570| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00005580| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 0d 19 78 38 20 |te",,blo|ck%..x8 |
|00005590| 62 6c 6f 63 6b 25 21 32 | 30 3d 30 3a 62 6c 6f 63 |block%!2|0=0:bloc|
|000055a0| 6b 25 21 32 34 3d 30 3a | c8 99 22 57 69 6d 70 5f |k%!24=0:|.."Wimp_|
|000055b0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|000055c0| 63 6b 25 0d 19 82 06 20 | e1 0d 19 8c 10 20 f4 2d |ck%.... |..... .-|
|000055d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 19 96 0f 20 dd f2 |--------|-.... ..|
|000055e0| 72 65 61 64 5f 76 65 72 | 0d 19 a0 14 20 2a 53 65 |read_ver|.... *Se|
|000055f0| 74 20 52 69 73 63 24 56 | 65 72 20 33 0d 19 aa 34 |t Risc$V|er 3...4|
|00005600| 20 ff 28 22 52 4d 45 6e | 73 75 72 65 20 55 74 69 | .("RMEn|sure Uti|
|00005610| 6c 69 74 79 4d 6f 64 75 | 6c 65 20 33 2e 30 30 20 |lityModu|le 3.00 |
|00005620| 53 65 74 20 52 69 73 63 | 24 56 65 72 20 32 22 29 |Set Risc|$Ver 2")|
|00005630| 0d 19 b4 39 20 c8 99 22 | 58 4f 53 5f 52 65 61 64 |...9 .."|XOS_Read|
|00005640| 56 61 72 56 61 6c 22 2c | 22 52 69 73 63 24 56 65 |VarVal",|"Risc$Ve|
|00005650| 72 22 2c 62 6c 6f 63 6b | 25 2c 32 35 36 2c 30 2c |r",block|%,256,0,|
|00005660| 30 20 b8 20 2c 2c 6c 65 | 6e 0d 19 be 20 20 62 6c |0 . ,,le|n... bl|
|00005670| 6f 63 6b 25 3f 6c 65 6e | 3d 31 33 3a 72 69 73 63 |ock%?len|=13:risc|
|00005680| 24 3d 24 62 6c 6f 63 6b | 25 0d 19 c8 14 20 2a 55 |$=$block|%.... *U|
|00005690| 6e 53 65 74 20 52 69 73 | 63 24 56 65 72 0d 19 d2 |nSet Ris|c$Ver...|
|000056a0| 06 20 e1 0d 19 dc 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|000056b0| 2d 2d 2d 0d 19 e6 20 20 | dd f2 72 65 73 74 6f 72 |---... |..restor|
|000056c0| 65 66 75 6c 6c 6d 6f 75 | 73 65 72 65 63 74 61 6e |efullmou|serectan|
|000056d0| 67 6c 65 0d 19 f0 36 20 | ea 20 62 25 2c 58 45 69 |gle...6 |. b%,XEi|
|000056e0| 67 25 2c 59 45 69 67 25 | 2c 58 70 69 78 25 2c 59 |g%,YEig%|,Xpix%,Y|
|000056f0| 70 69 78 25 2c 58 4f 53 | 55 75 6e 69 74 73 25 2c |pix%,XOS|Uunits%,|
|00005700| 59 4f 53 75 6e 69 74 73 | 25 0d 19 fa 34 20 de 20 |YOSunits|%...4 . |
|00005710| 62 25 20 36 34 3a 62 25 | 21 30 3d 34 3a 62 25 21 |b% 64:b%|!0=4:b%!|
|00005720| 34 3d 35 3a 62 25 21 38 | 3d 31 31 3a 62 25 21 31 |4=5:b%!8|=11:b%!1|
|00005730| 32 3d 31 32 3a 62 25 21 | 31 36 3d 2d 31 0d 1a 04 |2=12:b%!|16=-1...|
|00005740| 23 20 c8 99 20 22 4f 53 | 5f 52 65 61 64 56 64 75 |# .. "OS|_ReadVdu|
|00005750| 56 61 72 69 61 62 6c 65 | 73 22 2c 62 25 2c 62 25 |Variable|s",b%,b%|
|00005760| 0d 1a 0e 30 20 58 45 69 | 67 25 3d 21 62 25 3a 59 |...0 XEi|g%=!b%:Y|
|00005770| 45 69 67 25 3d 62 25 21 | 34 3a 58 70 69 78 25 3d |Eig%=b%!|4:Xpix%=|
|00005780| 62 25 21 38 3a 59 70 69 | 78 25 3d 62 25 21 31 32 |b%!8:Ypi|x%=b%!12|
|00005790| 0d 1a 18 3c 20 58 4f 53 | 55 6e 69 74 73 25 3d 28 |...< XOS|Units%=(|
|000057a0| 58 70 69 78 25 2b 31 29 | 2a 32 5e 58 45 69 67 25 |Xpix%+1)|*2^XEig%|
|000057b0| 3a 59 4f 53 55 6e 69 74 | 73 25 3d 28 59 70 69 78 |:YOSUnit|s%=(Ypix|
|000057c0| 25 2b 31 29 2a 32 5e 59 | 45 69 67 25 0d 1a 22 22 |%+1)*2^Y|Eig%..""|
|000057d0| 20 c8 97 20 c8 93 20 30 | 2c 30 2c 58 4f 53 55 6e | .. .. 0|,0,XOSUn|
|000057e0| 69 74 73 25 2c 59 4f 53 | 55 6e 69 74 73 25 0d 1a |its%,YOS|Units%..|
|000057f0| 2c 06 20 e1 0d 1a 36 10 | 20 f4 2d 2d 2d 2d 2d 2d |,. ...6.| .------|
|00005800| 2d 2d 2d 2d 0d 1a 40 0f | 20 dd f2 6b 65 79 70 72 |----..@.| ..keypr|
|00005810| 65 73 73 0d 1a 4a 1d 20 | 49 25 3d 62 6c 6f 63 6b |ess..J. |I%=block|
|00005820| 25 21 34 3a 4b 25 3d 62 | 6c 6f 63 6b 25 21 32 34 |%!4:K%=b|lock%!24|
|00005830| 0d 1a 54 3d 20 e7 20 4b | 25 3d 26 31 38 30 20 f2 |..T= . K|%=&180 .|
|00005840| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 70 72 69 6e 74 |openwind|ow(print|
|00005850| 5f 77 69 6e 25 29 3a f2 | 63 61 72 65 74 28 33 2c |_win%):.|caret(3,|
|00005860| 70 72 69 6e 74 5f 77 69 | 6e 25 29 3a e1 0d 1a 5e |print_wi|n%):...^|
|00005870| 3b 20 e7 20 4b 25 3d 26 | 31 38 33 20 f2 6f 70 65 |; . K%=&|183 .ope|
|00005880| 6e 77 69 6e 64 6f 77 28 | 73 61 76 65 5f 77 69 6e |nwindow(|save_win|
|00005890| 25 29 3a f2 63 61 72 65 | 74 28 30 2c 73 61 76 65 |%):.care|t(0,save|
|000058a0| 5f 77 69 6e 25 29 3a e1 | 0d 1a 68 12 20 c8 8e 20 |_win%):.|..h. .. |
|000058b0| 62 6c 6f 63 6b 25 21 30 | 20 ca 0d 1a 72 11 20 20 |block%!0| ...r. |
|000058c0| c9 20 77 68 61 6e 64 6c | 65 31 25 0d 1a 7c 10 20 |. whandl|e1%..|. |
|000058d0| 20 20 e7 20 4b 25 3d 31 | 33 20 8c 0d 1a 86 37 20 | . K%=1|3 ....7 |
|000058e0| 20 20 20 f2 7a 31 28 33 | 35 2c 77 68 61 6e 64 6c | .z1(3|5,whandl|
|000058f0| 65 31 25 29 3a f2 63 61 | 6c 63 5f 64 61 79 3a f2 |e1%):.ca|lc_day:.|
|00005900| 69 72 65 61 64 28 39 2c | 77 68 61 6e 64 6c 65 31 |iread(9,|whandle1|
|00005910| 25 29 0d 1a 90 35 20 20 | 20 20 e7 20 61 24 3d 22 |%)...5 | . a$="|
|00005920| 22 20 f2 72 6d 28 22 45 | 52 52 32 22 29 3a f2 65 |" .rm("E|RR2"):.e|
|00005930| 72 72 62 6f 78 28 74 65 | 78 74 24 29 3a f2 6d 69 |rrbox(te|xt$):.mi|
|00005940| 6e 69 5f 70 6f 6c 6c 0d | 1a 9a 18 20 20 20 20 e7 |ni_poll.|... .|
|00005950| 20 63 61 6c 63 5f 61 62 | 6f 72 74 3d a3 20 8c 0d | calc_ab|ort=. ..|
|00005960| 1a a4 3e 20 20 20 20 20 | f2 63 6c 69 63 6b 5f 62 |..> |.click_b|
|00005970| 69 72 74 68 3a f2 63 6c | 69 63 6b 5f 65 76 65 6e |irth:.cl|ick_even|
|00005980| 74 73 3a f2 63 6c 69 63 | 6b 5f 66 69 6c 6d 73 3a |ts:.clic|k_films:|
|00005990| f2 63 6c 69 63 6b 5f 73 | 63 6f 70 65 73 0d 1a ae |.click_s|copes...|
|000059a0| 2c 20 20 20 20 20 f2 72 | 65 61 64 5f 73 70 6f 72 |, .r|ead_spor|
|000059b0| 74 73 3a f2 63 6c 69 63 | 6b 5f 73 6f 6e 67 73 3a |ts:.clic|k_songs:|
|000059c0| f2 73 74 79 6c 65 28 31 | 29 0d 1a b8 09 20 20 20 |.style(1|).... |
|000059d0| 20 cd 0d 1a cc 37 20 20 | 20 20 c8 99 22 57 69 6d | ....7 | .."Wim|
|000059e0| 70 5f 46 6f 72 63 65 52 | 65 64 72 61 77 22 2c 77 |p_ForceR|edraw",w|
|000059f0| 68 61 6e 64 6c 65 31 25 | 2c 35 35 32 2c 2d 36 39 |handle1%|,552,-69|
|00005a00| 32 2c 39 39 30 2c 2d 37 | 32 0d 1a d6 14 20 20 20 |2,990,-7|2.... |
|00005a10| 20 73 61 76 65 64 5f 6f | 6b 3d a3 3a e1 0d 1a e0 | saved_o|k=.:....|
|00005a20| 08 20 20 20 cd 0d 1a ea | 12 20 20 c9 20 73 63 61 |. ....|. . sca|
|00005a30| 6c 65 5f 77 69 6e 25 0d | 1a f4 61 20 20 20 e7 20 |le_win%.|..a . |
|00005a40| 4b 25 3d 31 33 20 8c 20 | 62 6c 6f 63 6b 25 21 38 |K%=13 . |block%!8|
|00005a50| 3d 34 3a 62 6c 6f 63 6b | 25 21 31 32 3d 73 63 61 |=4:block|%!12=sca|
|00005a60| 6c 65 5f 77 69 6e 25 3a | 62 6c 6f 63 6b 25 21 31 |le_win%:|block%!1|
|00005a70| 36 3d 31 31 3a c8 99 22 | 57 69 6d 70 5f 53 65 6e |6=11:.."|Wimp_Sen|
|00005a80| 64 4d 65 73 73 61 67 65 | 22 2c 36 2c 62 6c 6f 63 |dMessage|",6,bloc|
|00005a90| 6b 25 2c 74 61 73 6b 25 | 0d 1a f5 11 20 20 c9 20 |k%,task%|.... . |
|00005aa0| 66 6f 6e 74 5f 77 69 6e | 25 0d 1a f6 60 20 20 20 |font_win|%...` |
|00005ab0| e7 20 4b 25 3d 31 33 20 | 8c 20 62 6c 6f 63 6b 25 |. K%=13 |. block%|
|00005ac0| 21 38 3d 34 3a 62 6c 6f | 63 6b 25 21 31 32 3d 66 |!8=4:blo|ck%!12=f|
|00005ad0| 6f 6e 74 5f 77 69 6e 25 | 3a 62 6c 6f 63 6b 25 21 |ont_win%|:block%!|
|00005ae0| 31 36 3d 31 34 3a c8 99 | 22 57 69 6d 70 5f 53 65 |16=14:..|"Wimp_Se|
|00005af0| 6e 64 4d 65 73 73 61 67 | 65 22 2c 36 2c 62 6c 6f |ndMessag|e",6,blo|
|00005b00| 63 6b 25 2c 74 61 73 6b | 25 0d 1a fe 12 20 20 c9 |ck%,task|%.... .|
|00005b10| 20 70 72 69 6e 74 5f 77 | 69 6e 25 0d 1b 08 60 20 | print_w|in%...` |
|00005b20| 20 20 e7 20 4b 25 3d 31 | 33 20 8c 20 62 6c 6f 63 | . K%=1|3 . bloc|
|00005b30| 6b 25 21 38 3d 34 3a 62 | 6c 6f 63 6b 25 21 31 32 |k%!8=4:b|lock%!12|
|00005b40| 3d 70 72 69 6e 74 5f 77 | 69 6e 25 3a 62 6c 6f 63 |=print_w|in%:bloc|
|00005b50| 6b 25 21 31 36 3d 36 3a | c8 99 22 57 69 6d 70 5f |k%!16=6:|.."Wimp_|
|00005b60| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 36 2c 62 |SendMess|age",6,b|
|00005b70| 6c 6f 63 6b 25 2c 74 61 | 73 6b 25 0d 1b 12 06 20 |lock%,ta|sk%.... |
|00005b80| cb 0d 1b 1c 1b 20 c8 99 | 22 57 69 6d 70 5f 50 72 |..... ..|"Wimp_Pr|
|00005b90| 6f 63 65 73 73 4b 65 79 | 22 2c 4b 25 0d 1b 26 06 |ocessKey|",K%..&.|
|00005ba0| 20 e1 0d 21 7a 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..!z. .|--------|
|00005bb0| 2d 2d 0d 21 84 0d 20 dd | f2 72 65 64 72 61 77 0d |--.!.. .|.redraw.|
|00005bc0| 21 8e 26 20 c8 99 22 48 | 6f 75 72 67 6c 61 73 73 |!.& .."H|ourglass|
|00005bd0| 5f 4f 6e 22 3a 77 69 6e | 64 6f 77 25 3d 62 6c 6f |_On":win|dow%=blo|
|00005be0| 63 6b 25 21 30 0d 21 98 | 2a 20 c8 99 22 57 69 6d |ck%!0.!.|* .."Wim|
|00005bf0| 70 5f 52 65 64 72 61 77 | 57 69 6e 64 6f 77 22 2c |p_Redraw|Window",|
|00005c00| 2c 62 6c 6f 63 6b 25 20 | b8 20 6d 6f 72 65 25 0d |,block% |. more%.|
|00005c10| 21 a2 0d 20 c8 95 20 6d | 6f 72 65 25 0d 21 ac 20 |!.. .. m|ore%.!. |
|00005c20| 20 20 f2 67 65 74 6f 72 | 69 67 69 6e 28 62 6c 6f | .getor|igin(blo|
|00005c30| 63 6b 25 2c 78 30 25 2c | 79 30 25 29 0d 21 b6 3f |ck%,x0%,|y0%).!.?|
|00005c40| 20 20 e7 20 77 69 6e 64 | 6f 77 25 3d 76 69 65 77 | . wind|ow%=view|
|00005c50| 5f 77 69 6e 25 20 62 6f | 74 74 6f 6d 77 69 6e 25 |_win% bo|ttomwin%|
|00005c60| 3d 62 6c 6f 63 6b 25 21 | 38 3a 74 6f 70 77 69 6e |=block%!|8:topwin|
|00005c70| 25 3d 62 6c 6f 63 6b 25 | 21 31 36 0d 21 c0 19 20 |%=block%|!16.!.. |
|00005c80| 20 f2 67 65 74 5f 69 6e | 66 6f 28 62 6c 6f 63 6b | .get_in|fo(block|
|00005c90| 25 2b 34 29 0d 21 ca 37 | 20 20 e7 20 77 69 6e 64 |%+4).!.7| . wind|
|00005ca0| 6f 77 25 3d 76 69 65 77 | 5f 77 69 6e 25 20 43 6f |ow%=view|_win% Co|
|00005cb0| 66 66 73 65 74 78 3d 28 | 62 6c 6f 63 6b 25 21 34 |ffsetx=(|block%!4|
|00005cc0| 2d 62 6c 6f 63 6b 25 21 | 32 30 29 0d 21 d4 41 20 |-block%!|20).!.A |
|00005cd0| 20 e7 20 77 69 6e 64 6f | 77 25 3d 76 69 65 77 5f | . windo|w%=view_|
|00005ce0| 77 69 6e 25 20 43 6f 66 | 66 73 65 74 79 3d 28 62 |win% Cof|fsety=(b|
|00005cf0| 6c 6f 63 6b 25 21 31 36 | 2d 62 6c 6f 63 6b 25 21 |lock%!16|-block%!|
|00005d00| 32 34 2d 76 69 65 77 5f | 62 6f 74 29 0d 21 de 41 |24-view_|bot).!.A|
|00005d10| 20 20 67 78 30 25 3d 62 | 6c 6f 63 6b 25 21 32 38 | gx0%=b|lock%!28|
|00005d20| 3a 67 79 30 25 3d 62 6c | 6f 63 6b 25 21 33 32 3a |:gy0%=bl|ock%!32:|
|00005d30| 67 78 31 25 3d 62 6c 6f | 63 6b 25 21 33 36 3a 67 |gx1%=blo|ck%!36:g|
|00005d40| 79 31 25 3d 62 6c 6f 63 | 6b 25 21 34 30 0d 21 e8 |y1%=bloc|k%!40.!.|
|00005d50| 39 20 20 67 78 30 25 3d | 28 67 78 30 25 2d 78 30 |9 gx0%=|(gx0%-x0|
|00005d60| 25 29 81 33 32 2a 33 32 | 2b 78 30 25 3a 67 79 31 |%).32*32|+x0%:gy1|
|00005d70| 25 3d 28 67 79 31 25 2d | 79 30 25 29 81 33 32 2a |%=(gy1%-|y0%).32*|
|00005d80| 33 32 2b 79 30 25 0d 21 | f2 31 20 20 43 67 78 30 |32+y0%.!|.1 Cgx0|
|00005d90| 25 3d 67 78 30 25 3a 43 | 67 79 30 25 3d 67 79 30 |%=gx0%:C|gy0%=gy0|
|00005da0| 25 3a 43 67 78 31 25 3d | 67 78 31 25 3a 43 67 79 |%:Cgx1%=|gx1%:Cgy|
|00005db0| 31 25 3d 67 79 31 25 0d | 21 fc 04 0d 22 06 12 20 |1%=gy1%.|!...".. |
|00005dc0| 20 c8 8e 20 77 69 6e 64 | 6f 77 25 20 ca 0d 22 10 | .. wind|ow% ..".|
|00005dd0| 11 20 20 c9 20 77 68 61 | 6e 64 6c 65 31 25 0d 22 |. . wha|ndle1%."|
|00005de0| 1a 38 20 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |.8 .."W|imp_SetC|
|00005df0| 6f 6c 6f 75 72 22 2c 30 | 3a c8 93 20 c8 90 20 78 |olour",0|:.. .. x|
|00005e00| 30 25 2b 35 35 32 2c 79 | 30 25 2d 36 39 32 2c 34 |0%+552,y|0%-692,4|
|00005e10| 33 38 2c 36 32 30 0d 22 | 24 35 20 20 c8 99 22 57 |38,620."|$5 .."W|
|00005e20| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 37 |imp_SetC|olour",7|
|00005e30| 3a c8 93 20 78 30 25 2b | 35 35 32 2c 79 30 25 2d |:.. x0%+|552,y0%-|
|00005e40| 36 39 32 2c 34 33 38 2c | 36 32 30 0d 22 2e 40 20 |692,438,|620.".@ |
|00005e50| 20 c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 | .."OS_S|priteOp"|
|00005e60| 2c 32 39 30 2c 67 72 61 | 62 5f 6d 65 6d 73 74 61 |,290,gra|b_memsta|
|00005e70| 72 74 2c 22 67 72 61 62 | 22 2c 78 30 25 2b 35 36 |rt,"grab|",x0%+56|
|00005e80| 38 2c 79 30 25 2d 36 36 | 38 2c 30 0d 22 38 04 0d |8,y0%-66|8,0."8..|
|00005e90| 22 42 1f 20 20 c9 20 76 | 69 65 77 5f 77 69 6e 25 |"B. . v|iew_win%|
|00005ea0| 3a f2 64 69 73 70 6c 61 | 79 5f 76 69 65 77 0d 22 |:.displa|y_view."|
|00005eb0| 4c 42 20 20 c9 20 77 68 | 61 6e 64 6c 65 39 25 3a |LB . wh|andle9%:|
|00005ec0| f2 72 6d 28 22 46 52 41 | 33 22 29 3a f2 66 72 61 |.rm("FRA|3"):.fra|
|00005ed0| 6d 65 28 78 30 25 2b 32 | 34 2c 79 30 25 2d 33 36 |me(x0%+2|4,y0%-36|
|00005ee0| 30 2c 35 32 36 2c 33 30 | 34 2c 74 65 78 74 24 29 |0,526,30|4,text$)|
|00005ef0| 0d 22 56 40 20 20 c9 20 | 65 72 72 62 6f 78 25 3a |."V@ . |errbox%:|
|00005f00| f2 72 6d 28 22 46 52 41 | 31 22 29 3a f2 66 72 61 |.rm("FRA|1"):.fra|
|00005f10| 6d 65 28 78 30 25 2b 32 | 34 2c 79 30 25 2d 33 36 |me(x0%+2|4,y0%-36|
|00005f20| 30 2c 35 32 36 2c 33 30 | 34 2c 74 65 78 74 24 29 |0,526,30|4,text$)|
|00005f30| 0d 22 60 04 0d 22 6a 07 | 20 20 cb 0d 22 74 2b 20 |."`.."j.| .."t+ |
|00005f40| 20 c8 99 22 57 69 6d 70 | 5f 47 65 74 52 65 63 74 | .."Wimp|_GetRect|
|00005f50| 61 6e 67 6c 65 22 2c 2c | 62 6c 6f 63 6b 25 20 b8 |angle",,|block% .|
|00005f60| 20 6d 6f 72 65 25 0d 22 | 7e 06 20 ce 0d 22 88 18 | more%."|~. .."..|
|00005f70| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 53 6d | .."Hour|glass_Sm|
|00005f80| 61 73 68 22 0d 22 92 06 | 20 e1 0d 22 9c 10 20 f4 |ash"."..| ..".. .|
|00005f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 22 a6 21 20 dd |--------|--.".! .|
|00005fa0| a4 69 6e 74 65 72 73 65 | 63 74 28 78 30 25 2c 79 |.interse|ct(x0%,y|
|00005fb0| 30 25 2c 78 31 25 2c 79 | 31 25 29 0d 22 b0 1f 20 |0%,x1%,y|1%).".. |
|00005fc0| e7 20 78 31 25 3c 67 78 | 30 25 20 84 20 78 30 25 |. x1%<gx|0% . x0%|
|00005fd0| 3e 67 78 31 25 20 8c 20 | 3d a3 0d 22 ba 1f 20 e7 |>gx1% . |=..".. .|
|00005fe0| 20 79 31 25 3c 67 79 30 | 25 20 84 20 79 30 25 3e | y1%<gy0|% . y0%>|
|00005ff0| 67 79 31 25 20 8c 20 3d | a3 0d 22 c4 07 20 3d b9 |gy1% . =|..".. =.|
|00006000| 0d 22 ce 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.".. .--|--------|
|00006010| 0d 22 d8 20 20 dd f2 72 | 65 63 74 66 69 6c 6c 28 |.". ..r|ectfill(|
|00006020| 78 30 25 2c 79 30 25 2c | 78 31 25 2c 79 31 25 29 |x0%,y0%,|x1%,y1%)|
|00006030| 0d 22 e2 17 20 ea 20 78 | 78 25 2c 79 79 25 2c 68 |.".. . x|x%,yy%,h|
|00006040| 74 25 2c 77 69 64 25 0d | 22 ec 1e 20 e7 20 78 31 |t%,wid%.|".. . x1|
|00006050| 25 3c 67 78 30 25 20 84 | 20 78 30 25 3e 67 78 31 |%<gx0% .| x0%>gx1|
|00006060| 25 20 8c 20 e1 0d 22 f6 | 1e 20 e7 20 79 31 25 3c |% . ..".|. . y1%<|
|00006070| 67 79 30 25 20 84 20 79 | 30 25 3e 67 79 31 25 20 |gy0% . y|0%>gy1% |
|00006080| 8c 20 e1 0d 23 00 22 20 | e7 20 78 30 25 3e 67 78 |. ..#." |. x0%>gx|
|00006090| 30 25 20 78 78 25 3d 78 | 30 25 20 8b 20 78 78 25 |0% xx%=x|0% . xx%|
|000060a0| 3d 67 78 30 25 0d 23 0a | 22 20 e7 20 79 30 25 3e |=gx0%.#.|" . y0%>|
|000060b0| 67 79 30 25 20 79 79 25 | 3d 79 30 25 20 8b 20 79 |gy0% yy%|=y0% . y|
|000060c0| 79 25 3d 67 79 30 25 0d | 23 14 2c 20 e7 20 78 31 |y%=gy0%.|#., . x1|
|000060d0| 25 3c 67 78 31 25 20 77 | 69 64 25 3d 78 31 25 2d |%<gx1% w|id%=x1%-|
|000060e0| 78 78 25 20 8b 20 77 69 | 64 25 3d 67 78 31 25 2d |xx% . wi|d%=gx1%-|
|000060f0| 78 78 25 0d 23 1e 2a 20 | e7 20 79 31 25 3c 67 79 |xx%.#.* |. y1%<gy|
|00006100| 31 25 20 68 74 25 3d 79 | 31 25 2d 79 79 25 20 8b |1% ht%=y|1%-yy% .|
|00006110| 20 68 74 25 3d 67 79 31 | 25 2d 79 79 25 0d 23 28 | ht%=gy1|%-yy%.#(|
|00006120| 1b 20 c8 93 20 c8 90 20 | 78 78 25 2c 79 79 25 2c |. .. .. |xx%,yy%,|
|00006130| 77 69 64 25 2c 68 74 25 | 0d 23 32 06 20 e1 0d 23 |wid%,ht%|.#2. ..#|
|00006140| 3c 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 23 |<. .----|------.#|
|00006150| 46 13 20 dd f2 73 61 76 | 65 64 65 66 61 75 6c 74 |F. ..sav|edefault|
|00006160| 73 0d 23 50 08 20 ea 20 | 85 0d 23 5a 53 20 ee 20 |s.#P. . |..#ZS . |
|00006170| 85 20 ea 3a f7 20 85 3a | 41 41 41 41 3d a4 77 69 |. .:. .:|AAAA=.wi|
|00006180| 6d 70 65 72 72 6f 72 3a | c8 99 22 58 4f 53 5f 43 |mperror:|.."XOS_C|
|00006190| 4c 49 22 2c 22 57 69 70 | 65 20 3c 21 42 69 72 74 |LI","Wip|e <!Birt|
|000061a0| 68 64 61 79 24 44 69 72 | 3e 2e 21 41 5a 66 61 75 |hday$Dir|>.!AZfau|
|000061b0| 6c 74 20 7e 43 7e 56 52 | 46 22 3a e1 0d 23 64 26 |lt ~C~VR|F":..#d&|
|000061c0| 20 f2 73 61 76 65 28 22 | 3c 21 42 69 72 74 68 64 | .save("|<!Birthd|
|000061d0| 61 79 24 44 69 72 3e 2e | 21 41 5a 66 61 75 6c 74 |ay$Dir>.|!AZfault|
|000061e0| 22 29 0d 23 6e 17 20 f2 | 73 61 76 65 64 65 66 61 |").#n. .|savedefa|
|000061f0| 75 6c 74 73 32 3a f7 20 | 85 0d 23 78 06 20 e1 0d |ults2:. |..#x. ..|
|00006200| 23 82 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |#.. .---|-------.|
|00006210| 23 8c 14 20 dd f2 73 61 | 76 65 64 65 66 61 75 6c |#.. ..sa|vedefaul|
|00006220| 74 73 32 0d 23 96 26 20 | 62 6c 6f 67 67 73 25 3d |ts2.#.& |bloggs%=|
|00006230| ad 28 22 3c 21 42 69 72 | 74 68 64 61 79 24 44 69 |.("<!Bir|thday$Di|
|00006240| 72 3e 2e 21 52 75 6e 22 | 29 0d 23 a0 33 20 d5 23 |r>.!Run"|).#.3 .#|
|00006250| 62 6c 6f 67 67 73 25 2c | 22 53 45 54 20 42 69 72 |bloggs%,|"SET Bir|
|00006260| 74 68 64 61 79 24 42 6f | 72 64 65 72 73 20 22 2b |thday$Bo|rders "+|
|00006270| 62 6f 72 64 65 72 5f 70 | 61 74 68 24 0d 23 aa 15 |border_p|ath$.#..|
|00006280| 20 c8 95 20 8f 23 62 6c | 6f 67 67 73 25 3c 35 31 | .. .#bl|oggs%<51|
|00006290| 32 0d 23 b4 38 20 20 e7 | 20 8f 23 62 6c 6f 67 67 |2.#.8 .| .#blogg|
|000062a0| 73 25 20 83 20 31 32 38 | 20 3d 30 20 d5 23 62 6c |s% . 128| =0 .#bl|
|000062b0| 6f 67 67 73 25 2c 31 30 | 20 8b 20 d5 23 62 6c 6f |oggs%,10| . .#blo|
|000062c0| 67 67 73 25 2c 97 22 7c | 22 0d 23 be 06 20 ce 0d |ggs%,."||".#.. ..|
|000062d0| 23 c8 0e 20 d9 23 62 6c | 6f 67 67 73 25 0d 23 d2 |#.. .#bl|oggs%.#.|
|000062e0| 06 20 e1 0d 23 dc 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..#.. |.-------|
|000062f0| 2d 2d 2d 0d 23 e6 1f 20 | dd f2 74 65 78 74 62 6f |---.#.. |..textbo|
|00006300| 78 28 62 78 25 2c 62 79 | 25 2c 77 64 25 2c 68 74 |x(bx%,by|%,wd%,ht|
|00006310| 25 29 0d 23 f0 2f 20 c8 | 99 22 57 69 6d 70 5f 53 |%).#./ .|."Wimp_S|
|00006320| 65 74 43 6f 6c 6f 75 72 | 22 2c 30 3a c8 93 20 c8 |etColour|",0:.. .|
|00006330| 90 20 62 78 25 2c 62 79 | 25 2c 77 64 25 2c 68 74 |. bx%,by|%,wd%,ht|
|00006340| 25 0d 23 fa 37 20 c8 99 | 22 57 69 6d 70 5f 53 65 |%.#.7 ..|"Wimp_Se|
|00006350| 74 43 6f 6c 6f 75 72 22 | 2c 31 3a c8 93 20 c8 90 |tColour"|,1:.. ..|
|00006360| 20 62 78 25 2b 34 2c 62 | 79 25 2b 34 2c 77 64 25 | bx%+4,b|y%+4,wd%|
|00006370| 2d 38 2c 68 74 25 2d 38 | 0d 24 04 19 20 c8 99 22 |-8,ht%-8|.$.. .."|
|00006380| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00006390| 34 0d 24 0e 1c 20 c8 93 | 20 c8 90 20 62 78 25 2c |4.$.. ..| .. bx%,|
|000063a0| 62 79 25 2b 32 2c 32 2c | 68 74 25 2d 32 0d 24 18 |by%+2,2,|ht%-2.$.|
|000063b0| 20 20 c8 93 20 c8 90 20 | 62 78 25 2c 62 79 25 2b | .. .. |bx%,by%+|
|000063c0| 68 74 25 2d 32 2c 77 64 | 25 2d 32 2c 32 0d 24 22 |ht%-2,wd|%-2,2.$"|
|000063d0| 2b 20 ec 20 62 78 25 2c | 62 79 25 3a ec 20 62 78 |+ . bx%,|by%:. bx|
|000063e0| 25 2c 62 79 25 2b 32 3a | f0 20 38 35 2c 62 78 25 |%,by%+2:|. 85,bx%|
|000063f0| 2b 32 2c 62 79 25 2b 32 | 0d 24 2c 43 20 ec 20 62 |+2,by%+2|.$,C . b|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
